Metrics for Migdal et al, Equation (64)

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze0.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated

Algorithm

1×

Search

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

Compiler

Compiled 21 to 14 computations (33.3% saved)

sample1.4s (12.1%)

Memory

-16.6MiB live, 1 421.7MiB allocated

Samples

1.1s

8 256×

valid

Precisions

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

ival-mult: 291.0ms (36.1% of total)

ival-cos: 287.0ms (35.6% of total)

ival-sqrt: 95.0ms (11.8% of total)

ival-div: 71.0ms (8.8% of total)

ival-add: 47.0ms (5.8% of total)

ival-true: 6.0ms (0.7% of total)

exact: 5.0ms (0.6% of total)

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

Bogosity

explain204.0ms (1.8%)

Memory

8.3MiB live, 177.3MiB allocated

FPErrors

Click to see full error table

Example	Example	Subexpression
-	-	`a1`
-	-	`(*.f64 a1 a1)`
-	-	`(sqrt.f64 #s(literal 2 binary64))`
-	-	`th`
-	-	`#s(literal 2 binary64)`
-	-	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
-	-	`(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))`
-	-	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
-	-	`(*.f64 a2 a2)`
-	-	`(cos.f64 th)`
-	-	`(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))`
-	-	`a2`

Confusion

	Predicted +	Predicted -
+	0	0
-	0	256

Precision

0/0

Recall

0/0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	0	0	0
-	0	0	256

Precision?

0/0

Recall?

0/0

Freqs

test

number	freq
0	256

Total Confusion?

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

Precision?

0/0

Recall?

0/0

Samples

76.0ms

512×

valid

Compiler

Compiled 138 to 40 computations (71% saved)

Precisions

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

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

ival-cos: 15.0ms (25.7% of total)

ival-sqrt: 4.0ms (6.9% of total)

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

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

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

exact: 0.0ms (0% of total)

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

preprocess137.0ms (1.2%)

Memory

-10.8MiB live, 27.9MiB allocated

Algorithm

1×	egg-herbie

Rules

1 520×	`times-frac`
1 254×	`distribute-lft-in`
1 236×	`distribute-rgt-in`
946×	`div-sub`
714×	`associate-/r*`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	40	120
1	130	120
2	373	120
3	1018	120
4	2414	120
5	4784	120
6	5686	120
7	6500	120
8	6573	120
9	6589	120
10	6760	120
11	6878	120
12	6890	120
13	6890	120
14	6890	120
0	12	19
0	20	13
1	33	13
2	58	13
3	88	13
4	100	13
0	100	12

Stop Event

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

Calls

Call 1

Inputs
(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))

Outputs

(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))

(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))

Symmetry

(abs th)

(abs a2)

(abs a1)

(sort a1 a2)

Compiler

Compiled 22 to 12 computations (45.5% saved)

eval0.0ms (0%)

Memory: 0.6MiB live, 0.6MiB allocated
Compiler: Compiled 3 to 3 computations (0% saved)

prune1.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.6%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))

Compiler

Compiled 22 to 12 computations (45.5% saved)

simplify6.0ms (0.1%)

Memory

10.4MiB live, 10.4MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Score
cost-diff	0	(cos.f64 th)
cost-diff	0	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
cost-diff	0	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
cost-diff	8192	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))

Rules

100×	`lower-*.f32`
92×	`lower-*.f64`
60×	`lower-fma.f64`
60×	`lower-fma.f32`
48×	`*-commutative`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	12	56
0	20	50
1	33	50
2	58	50
3	88	50
4	100	50
0	100	49

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

Inputs
(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a1 a1)
a1
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(*.f64 a2 a2)
a2

Outputs
(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a1 a1)
a1
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(.f64 (.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 a2)
a2

localize45.0ms (0.4%)

Memory

9.8MiB live, 86.5MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.00390625	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
accuracy	0.18197250976844204	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
accuracy	0.19921875	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
accuracy	0.717128759768442	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

Samples

33.0ms

256×

valid

Compiler

Compiled 58 to 14 computations (75.9% saved)

Precisions

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

ival-sqrt: 8.0ms (35.6% of total)

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

ival-cos: 5.0ms (22.3% of total)

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

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

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

exact: 0.0ms (0% of total)

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

series26.0ms (0.2%)

Memory

-34.1MiB live, 44.5MiB allocated

Counts

5 → 108

Calls

Call 1

Inputs
#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())
#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())

Outputs
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (patch (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2))) (taylor 0 th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2))) (taylor 0 th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a1 2) (sqrt 2))))))) (/ (pow a1 2) (sqrt 2))) (taylor 0 th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (patch (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #<representation binary64>) () ())) ())

Calls

27 calls:

Time	Variable		Point	Expression
9.0ms	th	@	0	(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
2.0ms	th	@	inf	(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
2.0ms	th	@	-inf	(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
2.0ms	th	@	-inf	(/ (cos th) (sqrt 2))
1.0ms	a1	@	0	(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))

simplify545.0ms (4.7%)

Memory

24.3MiB live, 608.8MiB allocated

Algorithm

1×	egg-herbie

Rules

34 694×	`lower-fma.f64`
34 694×	`lower-fma.f32`
6 426×	`lower-*.f64`
6 426×	`lower-*.f32`
4 620×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	111	1498
1	343	1366
2	1205	1262
3	3898	1233
0	8422	1172

Stop Event

1×	iter limit
1×	node limit

Counts

108 → 108

Calls

Call 1

Inputs
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a1 2) (sqrt 2))))))) (/ (pow a1 2) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ 1 (sqrt 2))
(+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(/ (pow a2 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))

Outputs
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(.f64 (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 th th) (fma.f64 th (.f64 th #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 th (.f64 th (.f64 (.f64 (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/.f64 (.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 th (.f64 th #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a1 2) (sqrt 2))))))) (/ (pow a1 2) (sqrt 2)))
(fma.f64 (.f64 th th) (.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 th (.f64 th (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) #s(literal -1/2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ 1 (sqrt 2))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))
(.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(fma.f64 (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 th (.f64 th #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(fma.f64 (.f64 th th) (/.f64 (.f64 th (.f64 th (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 (.f64 th th) (fma.f64 th (.f64 th #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (.f64 th th) (fma.f64 th (.f64 th (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 th (.f64 th #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th)) (fma.f64 th (.f64 th (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) #s(literal -1/2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))

rewrite312.0ms (2.7%)

Memory

29.0MiB live, 335.2MiB allocated

Rules

6 176×	`lower-fma.f64`
6 176×	`lower-fma.f32`
4 662×	`lower-*.f32`
4 654×	`lower-*.f64`
2 804×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	12	44
0	20	38
1	58	38
2	411	38
3	7331	38
0	8434	37

Stop Event

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

Counts

5 → 327

Calls

Call 1

Inputs
(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))

Outputs
(+.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a2 a2) (.f64 a1 a1)))) (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a2 a2) (.f64 a1 a1)))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a1 a1) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (cos.f64 th)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 th)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (cos.f64 th)) (/.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (cos.f64 th)) (/.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a1 a1) (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (.f64 (.f64 a1 a1) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a1 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)))) (/.f64 a1 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a1 a1) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a1 a1) (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 (.f64 a1 a1) (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a1 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (.f64 a2 a2))))) #s(literal 2 binary64) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))) (fma.f64 (.f64 (.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))) (neg.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (.f64 (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 a1 (.f64 a2 a2))))
(neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (neg.f64 (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))))))
(neg.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(neg.f64 (/.f64 (neg.f64 (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(neg.f64 (/.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (fma.f64 (cos.f64 th) (.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))))
(/.f64 (fma.f64 (cos.f64 th) (.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))) (neg.f64 (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (.f64 (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 9 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 9 binary64))) (.f64 (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 6 binary64))) (pow.f64 (.f64 (.f64 a2 a2) (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 6 binary64))) (.f64 (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))) (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 6 binary64))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (fma.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64)))))
(/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a2 a2) (.f64 a1 a1))))
(/.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2)))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (cos.f64 th) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 #s(literal -1 binary64) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 9 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 9 binary64))) #s(literal 1 binary64)) (.f64 (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 6 binary64))) (pow.f64 (.f64 (.f64 a2 a2) (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 6 binary64))) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (cos.f64 th)) (.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (neg.f64 (cos.f64 th))) (.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #s(literal 1 binary64)) (.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #s(literal -1 binary64)) (.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (cos.f64 th))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal -1 binary64)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th)))))
(/.f64 (neg.f64 (fma.f64 (cos.f64 th) (.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a2 a2) (.f64 a1 a1)))))
(/.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th))))
(/.f64 (-.f64 (pow.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (.f64 (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) #s(literal 1 binary64)) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))))
(/.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th))))
(/.f64 (.f64 #s(literal -1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 9 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 9 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))))) (-.f64 (+.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 6 binary64))) (pow.f64 (.f64 (.f64 a2 a2) (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))))) (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 6 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 6 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (pow.f64 (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64))))
(/.f64 (.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))))
(/.f64 (.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (/.f64 (fma.f64 (cos.f64 th) (.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (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 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal -1 binary64))
(.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (neg.f64 (cos.f64 th)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(.f64 (neg.f64 (cos.f64 th)) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)))))
(.f64 (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))))))
(.f64 (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)))))
(.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (fma.f64 a1 a1 (*.f64 a2 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (fma.f64 (cos.f64 th) (.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))) #s(literal 1/2 binary64))
(.f64 (neg.f64 (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))))))
(.f64 (neg.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)))) (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a2 a2) (*.f64 a1 a1)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(.f64 (/.f64 (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (+.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #s(literal 3 binary64)))) (fma.f64 (.f64 (.f64 (.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (-.f64 (.f64 (.f64 (.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))) (pow.f64 (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64))))
(.f64 (/.f64 (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (-.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (.f64 a2 a2) (.f64 a1 a1)))))
(.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (.f64 a2 a2))))) #s(literal 2 binary64))
(.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))) (fma.f64 (.f64 (.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) #s(literal 1/2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #s(literal 1 binary64)))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th))))
(/.f64 (.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th))))
(/.f64 (neg.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (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 a1 a1) (neg.f64 (cos.f64 th))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #s(literal -1 binary64))
(.f64 (cos.f64 th) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(.f64 a1 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (neg.f64 (cos.f64 th)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(.f64 (neg.f64 (cos.f64 th)) (/.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (*.f64 a1 a1)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1)
(.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(.f64 (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 (.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (.f64 (cos.f64 th) a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)))
(.f64 (/.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (cos.f64 th)))
(.f64 (.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1/2 binary64)))
(cos.f64 th)
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 th)))
(neg.f64 (neg.f64 (cos.f64 th)))
(*.f64 (cos.f64 th) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 th))
(*.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 th)))
(neg.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2)))))
(/.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th))))
(/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (cos.f64 th))))
(/.f64 (.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (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 a2 a2) (neg.f64 (cos.f64 th))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2))) #s(literal -1 binary64))
(.f64 (cos.f64 th) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(.f64 a2 (.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (neg.f64 (cos.f64 th)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(.f64 (neg.f64 (cos.f64 th)) (/.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (*.f64 a2 a2)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2)
(.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)))
(.f64 (/.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))

eval108.0ms (0.9%)

Memory: -1.1MiB live, 110.0MiB allocated
Compiler: Compiled 14 708 to 1 014 computations (93.1% saved)

prune281.0ms (2.4%)

Memory

-42.8MiB live, 153.0MiB allocated

Pruning

15 alts after pruning (15 fresh and 0 done)

	Pruned	Kept	Total
New	475	15	490
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	476	15	491

Accuracy

100.0%

Counts

491 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.7%	(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
	16.3%	(/.f64 (.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)))))
▶	27.0%	(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	99.7%	(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
	99.4%	(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
▶	99.3%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))))
	99.2%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))) (*.f64 a2 a2)))
	42.7%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th)) (fma.f64 th (.f64 th (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) #s(literal -1/2 binary64))))))
	99.7%	(.f64 (fma.f64 (cos.f64 th) (.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))) #s(literal 1/2 binary64))
	99.6%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
▶	99.7%	(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
▶	70.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
	99.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
	53.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
	68.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))

Compiler

Compiled 686 to 398 computations (42% saved)

simplify366.0ms (3.2%)

Memory

24.1MiB live, 224.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(fma.f64 a1 a1 (*.f64 a2 a2))
cost-diff	0	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
cost-diff	0	(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))
cost-diff	2048	(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff	0	(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
cost-diff	0	(sqrt.f64 #s(literal 2 binary64))
cost-diff	0	(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
cost-diff	704	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))))
cost-diff	0	(*.f64 a2 a2)
cost-diff	0	(fma.f64 a1 a1 (*.f64 a2 a2))
cost-diff	0	(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff	0	(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
cost-diff	0	(sqrt.f64 #s(literal 2 binary64))
cost-diff	0	(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
cost-diff	0	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff	1344	(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
cost-diff	0	(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
cost-diff	0	(*.f64 a2 a2)
cost-diff	0	(fma.f64 a1 a1 (*.f64 a2 a2))
cost-diff	384	(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))

Rules

7 150×	`lower-fma.f32`
7 146×	`lower-fma.f64`
4 382×	`lower-+.f32`
4 380×	`lower-+.f64`
3 798×	`lower-*.f32`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	35	286
0	56	264
1	106	264
2	298	264
3	1599	264
4	6034	255
0	8744	255

Stop Event

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

Calls

Call 1

Inputs
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 th)
th
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
a1
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 a2)
a2
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 th)
th
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(literal 1 binary64)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(cos.f64 th)
th
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(*.f64 (+.f64 a1 a2) (-.f64 a1 a2))
(+.f64 a1 a2)
(-.f64 a1 a2)
(cos.f64 th)
th
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

Outputs
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 th)
th
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
a1
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 a2)
a2
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 th)
th
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
#s(literal 1 binary64)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))
(cos.f64 th)
th
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))
(.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(*.f64 (+.f64 a1 a2) (-.f64 a1 a2))
(+.f64 a1 a2)
(-.f64 a1 a2)
(cos.f64 th)
th
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

localize166.0ms (1.4%)

Memory

-17.6MiB live, 178.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.0234375	(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))
accuracy	0.11166000976844202	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
accuracy	0.20998002930532605	(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
accuracy	42.1321729750172	(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0.00390625	(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy	0.06640625	(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
accuracy	0.31603028531661925	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))))
accuracy	1.002650974688637	(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
accuracy	0	(cos.f64 th)
accuracy	0.00390625	(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy	0.0546875	(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
accuracy	0.20216752930532603	(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.00390625	(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0.20998002930532603	(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.3828125	(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy	18.512528610816325	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
accuracy	0	(cos.f64 th)
accuracy	0.00390625	(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy	0.12890625	(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
accuracy	0.17644501953688402	(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))

Samples

95.0ms

256×

valid

Compiler

Compiled 289 to 34 computations (88.2% saved)

Precisions

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

ival-mult: 35.0ms (57.6% of total)

ival-div: 12.0ms (19.7% of total)

ival-cos: 5.0ms (8.2% of total)

ival-add: 4.0ms (6.6% of total)

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

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

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

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

exact: 0.0ms (0% of total)

series71.0ms (0.6%)

Memory

-4.7MiB live, 69.8MiB allocated

Counts

19 → 468

Calls

Call 1

Inputs
#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())
#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())
#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())
#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())
#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(literal 2 binary64)) (patch (sqrt.f64 #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())
#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())
#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())
#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())

Outputs
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (sqrt 2) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2))))) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (sqrt 2)) (+ (* 1/48 (sqrt 2)) (* 1/2 (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2)))))))) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2))))) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (cos th)) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (cos th)) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (cos th)) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (cos th)) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (cos th)) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (cos th)) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (cos th)) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (cos th)) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (patch (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* (pow th 2) (sqrt 2)) (+ (pow a1 2) (pow a2 2)))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (+ (* 1/48 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (sqrt 2) (* (pow a2 2) (cos th)))) (taylor 0 a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 6) (cos th))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th)))) (taylor 0 a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a2 6) (cos th)))))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th)))) (taylor 0 a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a1 2) (cos th))) (taylor inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a1 2) (cos th))) (taylor -inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a1 2) (cos th))) (taylor 0 a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (sqrt 2) (* (pow a1 2) (cos th)))) (taylor 0 a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 6) (cos th))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th)))) (taylor 0 a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (* (pow a2 2) (- (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a1 6) (cos th)))))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th)))) (taylor 0 a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a2 2) (cos th))) (taylor inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2)) (taylor inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2)) (taylor inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2)) (taylor inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a2 2) (cos th))) (taylor -inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2)) (taylor -inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2)) (taylor -inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2)) (taylor -inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 4) (cos th))) (taylor 0 a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 4) (cos th))) (* a1 (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3)))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (+ (* a1 (* (cos th) (+ a2 (* -1 a2)))) (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3)))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (cos th)) (taylor inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1))) (taylor inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (+ (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2)) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) (pow a1 3)))))) (taylor inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (cos th)) (taylor -inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1))) (taylor -inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) a1)) a1)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (* -1 (/ (+ (* -1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) a1)) a1))) a1)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (cos th)) (taylor 0 a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3)))) (* (pow a1 4) (cos th))) (taylor 0 a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* a2 (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th))) (taylor 0 a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* a2 (+ (* a2 (* (cos th) (+ a1 (* -1 a1)))) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th))) (taylor 0 a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 4) (cos th))) (taylor inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (/ (* (cos th) (+ a1 (* -1 a1))) a2))) (taylor inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (+ (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2)) (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a2 3)))))) (taylor inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 4) (cos th))) (taylor -inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (* (cos th) (+ a1 (* -1 a1))) a2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) a2)) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (taylor 0 th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor 0 th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* 1/24 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))))))) (taylor 0 th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* 1/24 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))))))) (taylor 0 th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor -inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor -inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor -inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor -inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a2 4)) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (pow a2 3)))) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a2 3))))) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (+ (* a1 (+ a2 (* -1 a2))) (pow a2 2)))) (pow a2 3))))) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (pow a1 4) (taylor inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1)))) (taylor inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (/ a2 a1) (/ (pow a2 2) (pow a1 2))))))) (taylor inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow a2 3) (pow a1 3))) (+ (/ a2 a1) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 3) (pow a1 3))))))))) (taylor inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (pow a1 4) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1)))) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (+ (* -1 (/ (pow a2 2) a1)) (/ (pow a2 2) a1))) a1)))) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (* -1 (/ (+ (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (* -1 (/ (pow a2 3) a1)) (/ (pow a2 3) a1))) a1))) a1)))) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (pow a1 4) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a1 4)) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a1 3)))) (pow a1 4)) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (+ (* a2 (+ a1 (* -1 a1))) (pow a1 2)))) (pow a1 3)))) (pow a1 4)) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a2 4)) (taylor inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1)) (taylor inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 2) (pow a2 2))))) 1)) (taylor inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 3) (pow a2 3))) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow a1 3) (pow a2 3))))))) 1)) (taylor inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a2 4)) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1)) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) a2)))) a2)) 1)) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) a2)) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)))) a2)) 1)) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (* (sqrt 2) (+ a2 (* -1 a2))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2)))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2)))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (* (sqrt 2) (+ a1 (* -1 a1)))) (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 2) (sqrt 2))) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2))) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 2) (sqrt 2))) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())

Calls

117 calls:

Time	Variable		Point	Expression
8.0ms	a1	@	0	(/ (sqrt 2) (* (cos th) (+ (* a1 a1) (* a2 a2))))
3.0ms	a1	@	-inf	(/ 1 (/ (sqrt 2) (* (cos th) (+ (* a1 a1) (* a2 a2)))))
1.0ms	a1	@	inf	(* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2)))
1.0ms	th	@	0	(/ (sqrt 2) (* (cos th) (+ (* a1 a1) (* a2 a2))))
1.0ms	th	@	inf	(* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th))

simplify267.0ms (2.3%)

Memory

28.8MiB live, 274.1MiB allocated

Algorithm

1×	egg-herbie

Rules

9 328×	`lower-fma.f64`
9 328×	`lower-fma.f32`
4 704×	`lower-*.f64`
4 704×	`lower-*.f32`
2 664×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	553	7565
1	1926	6768
2	7536	6750
0	8044	6362

Stop Event

1×	iter limit
1×	node limit

Counts

468 → 468

Calls

Call 1

Inputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(sqrt 2)
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(+ (sqrt 2) (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (sqrt 2)) (+ (* 1/48 (sqrt 2)) (* 1/2 (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2)))))))) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))
(+ (* 1/2 (/ (* (pow th 2) (sqrt 2)) (+ (pow a1 2) (pow a2 2)))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (+ (* 1/48 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(+ (* (pow a1 2) (- (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 6) (cos th))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(+ (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a2 6) (cos th)))))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2))
(/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2))
(/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(+ (* (pow a2 2) (- (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 6) (cos th))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(+ (* (pow a2 2) (- (* (pow a2 2) (- (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a1 6) (cos th)))))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2))
(/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2))
(/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (pow a2 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(* -1 (* (pow a2 4) (cos th)))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3)))))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))))))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (+ (* a1 (* (cos th) (+ a2 (* -1 a2)))) (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))))))
(* (pow a1 4) (cos th))
(* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1)))
(* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2)))))
(* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (+ (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2)) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) (pow a1 3))))))
(* (pow a1 4) (cos th))
(* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1)))
(* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) a1)) a1))))
(* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (* -1 (/ (+ (* -1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) a1)) a1))) a1))))
(* (pow a1 4) (cos th))
(+ (* a2 (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3)))) (* (pow a1 4) (cos th)))
(+ (* a2 (+ (* a2 (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th)))
(+ (* a2 (+ (* a2 (+ (* a2 (* (cos th) (+ a1 (* -1 a1)))) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th)))
(* -1 (* (pow a2 4) (cos th)))
(* (pow a2 4) (+ (* -1 (cos th)) (/ (* (cos th) (+ a1 (* -1 a1))) a2)))
(* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2)))))
(* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (+ (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2)) (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a2 3))))))
(* -1 (* (pow a2 4) (cos th)))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (* (cos th) (+ a1 (* -1 a1))) a2))))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2))))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) a2)) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2))))
(* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))
(+ (* -1/2 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* 1/24 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))))))
(+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* 1/24 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))))))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* -1 (pow a2 4))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (pow a2 3))))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a2 3)))))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (+ (* a1 (+ a2 (* -1 a2))) (pow a2 2)))) (pow a2 3)))))
(pow a1 4)
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1))))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (/ a2 a1) (/ (pow a2 2) (pow a1 2)))))))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow a2 3) (pow a1 3))) (+ (/ a2 a1) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 3) (pow a1 3)))))))))
(pow a1 4)
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1))))
(* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (+ (* -1 (/ (pow a2 2) a1)) (/ (pow a2 2) a1))) a1))))
(* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (* -1 (/ (+ (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (* -1 (/ (pow a2 3) a1)) (/ (pow a2 3) a1))) a1))) a1))))
(pow a1 4)
(+ (* a2 (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a1 4))
(+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a1 3)))) (pow a1 4))
(+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (+ (* a2 (+ a1 (* -1 a1))) (pow a1 2)))) (pow a1 3)))) (pow a1 4))
(* -1 (pow a2 4))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 2) (pow a2 2))))) 1))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 3) (pow a2 3))) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow a1 3) (pow a2 3))))))) 1))
(* -1 (pow a2 4))
(* (pow a2 4) (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1))
(* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) a2)))) a2)) 1))
(* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) a2)) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)))) a2)) 1))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(* -1 (* (pow a2 2) (sqrt 2)))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (* (sqrt 2) (+ a2 (* -1 a2)))))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2))))))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2))))))
(* (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))
(* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))))
(* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))))
(* (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))
(* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1))))
(* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1))))
(* (pow a1 2) (sqrt 2))
(+ (* a2 (* (sqrt 2) (+ a1 (* -1 a1)))) (* (pow a1 2) (sqrt 2)))
(+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2)))
(+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* -1 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2))))

Outputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 th th) #s(literal 1/24 binary64)) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (.f64 th th) #s(literal -1/720 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 a1 (.f64 a1 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 a1 (.f64 a1 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 a1 (.f64 a1 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 a1 (.f64 a1 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 a1 (.f64 a1 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 a1 (.f64 a1 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(.f64 (fma.f64 (.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(fma.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64) (.f64 (.f64 th th) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5/24 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (sqrt 2)) (+ (* 1/48 (sqrt 2)) (* 1/2 (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2)))))))) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 7/360 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -5/48 binary64))) (neg.f64 (.f64 th th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5/24 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 th th)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/24 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/24 binary64) (.f64 (.f64 (.f64 th th) #s(literal -1/720 binary64)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 th th) #s(literal 1/24 binary64)) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (.f64 th th) #s(literal -1/720 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 th th) #s(literal 1/24 binary64)) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (.f64 th th) #s(literal -1/720 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (/ (* (pow th 2) (sqrt 2)) (+ (pow a1 2) (pow a2 2)))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(fma.f64 (.f64 th th) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1))))
(+ (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1))) #s(literal 5/24 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (+ (* 1/48 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1))) #s(literal 7/360 binary64) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1))) #s(literal -5/48 binary64))) (neg.f64 (.f64 th th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1))) #s(literal 5/24 binary64))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))
(+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64)))))
(+ (* (pow a1 2) (- (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 6) (cos th))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(fma.f64 (.f64 a1 a1) (-.f64 (/.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))))
(+ (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a2 6) (cos th)))))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(fma.f64 (.f64 a1 a1) (-.f64 (.f64 a1 (.f64 a1 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))) (/.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 8 binary64))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))
(/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2))
(/.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 th) (.f64 a1 a1)))) (*.f64 a1 a1))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (.f64 a2 a2) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2))
(/.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))))) (.f64 a1 a1))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))
(/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2))
(/.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 th) (.f64 a1 a1)))) (*.f64 a1 a1))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (.f64 a2 a2) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2))
(/.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))))) (.f64 a1 a1))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))
(+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))))
(+ (* (pow a2 2) (- (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 6) (cos th))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(fma.f64 a2 (.f64 a2 (-.f64 (.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))))
(+ (* (pow a2 2) (- (* (pow a2 2) (- (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a1 6) (cos th)))))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(fma.f64 a2 (.f64 a2 (-.f64 (.f64 (.f64 a2 a2) (fma.f64 (.f64 a2 (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 8 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))
(/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2))
(/.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (*.f64 a2 a2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (.f64 a1 a1) (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2))
(/.f64 (-.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64))))) (-.f64 (/.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64)))))) (*.f64 a2 a2))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))
(/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2))
(/.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (*.f64 a2 a2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (.f64 a1 a1) (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2))
(/.f64 (-.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64))))) (-.f64 (/.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64)))))) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (.f64 th th) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 (.f64 th th) (*.f64 th th))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(* (pow a2 2) (cos th))
(.f64 a2 (.f64 a2 (cos.f64 th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(* (pow a1 2) (cos th))
(.f64 (cos.f64 th) (.f64 a1 a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (cos th))
(.f64 (cos.f64 th) (.f64 a1 a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (cos th))
(.f64 (cos.f64 th) (.f64 a1 a1))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))
(* (pow a2 2) (cos th))
(.f64 a2 (.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (cos th))
(.f64 a2 (.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (.f64 a2 a2)) (cos.f64 th)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 th th) #s(literal 1/24 binary64)) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (.f64 th th) #s(literal -1/720 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* (pow a2 4) (cos th)))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3)))))
(-.f64 (.f64 (cos.f64 th) #s(literal 0 binary64)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64))))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))))))
(-.f64 (.f64 (cos.f64 th) #s(literal 0 binary64)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64))))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (+ (* a1 (* (cos th) (+ a2 (* -1 a2)))) (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))))))
(-.f64 (.f64 (cos.f64 th) #s(literal 0 binary64)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a1 4) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))
(* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1)))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (+ (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2)) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) (pow a1 3))))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))
(* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1)))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) a1)) a1))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (* -1 (/ (+ (* -1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) a1)) a1))) a1))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))
(+ (* a2 (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3)))) (* (pow a1 4) (cos th)))
(fma.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (cos.f64 th) #s(literal 0 binary64)))
(+ (* a2 (+ (* a2 (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th)))
(fma.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (cos.f64 th) #s(literal 0 binary64)))
(+ (* a2 (+ (* a2 (+ (* a2 (* (cos th) (+ a1 (* -1 a1)))) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th)))
(fma.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (cos.f64 th) #s(literal 0 binary64)))
(* -1 (* (pow a2 4) (cos th)))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (/ (* (cos th) (+ a1 (* -1 a1))) a2)))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2)))))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (+ (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2)) (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a2 3))))))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* -1 (* (pow a2 4) (cos th)))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (* (cos th) (+ a1 (* -1 a1))) a2))))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2))))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) a2)) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2))))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))
(.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))
(+ (* -1/2 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2))))
(+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* 1/24 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))))))
(fma.f64 (.f64 th th) (.f64 (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2))))
(+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* 1/24 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (.f64 (.f64 (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 (.f64 th th) (*.f64 th th))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))))
(* -1 (pow a2 4))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (pow a2 3))))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a2 3)))))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (+ (* a1 (+ a2 (* -1 a2))) (pow a2 2)))) (pow a2 3)))))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(pow a1 4)
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1))))
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (/ a2 a1) (/ (pow a2 2) (pow a1 2)))))))
(.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) (/.f64 a2 a1)) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) (/.f64 a2 a1)))))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow a2 3) (pow a1 3))) (+ (/ a2 a1) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 3) (pow a1 3)))))))))
(.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 a2 a1)) (fma.f64 (.f64 a2 a2) (/.f64 a2 (.f64 a1 (.f64 a1 a1))) (/.f64 (.f64 a2 a2) (.f64 a1 a1)))) (fma.f64 (.f64 a2 a2) (/.f64 a2 (.f64 a1 (.f64 a1 a1))) (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) (/.f64 a2 a1)))))
(pow a1 4)
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1))))
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (+ (* -1 (/ (pow a2 2) a1)) (/ (pow a2 2) a1))) a1))))
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (* -1 (/ (+ (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (* -1 (/ (pow a2 3) a1)) (/ (pow a2 3) a1))) a1))) a1))))
(pow.f64 a1 #s(literal 4 binary64))
(pow a1 4)
(pow.f64 a1 #s(literal 4 binary64))
(+ (* a2 (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a1 4))
(+.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 0 binary64))
(+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a1 3)))) (pow a1 4))
(+.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 0 binary64))
(+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (+ (* a2 (+ a1 (* -1 a1))) (pow a1 2)))) (pow a1 3)))) (pow a1 4))
(+.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 0 binary64))
(* -1 (pow a2 4))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 2) (pow a2 2))))) 1))
(.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 #s(literal -1 binary64) (-.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) (/.f64 a1 a2)) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) (/.f64 a1 a2)))))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 3) (pow a2 3))) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow a1 3) (pow a2 3))))))) 1))
(.f64 (pow.f64 a2 #s(literal 4 binary64)) (-.f64 (+.f64 (-.f64 (fma.f64 (.f64 a1 a1) (/.f64 a1 (.f64 a2 (.f64 a2 a2))) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) (/.f64 a1 a2))) (fma.f64 (.f64 a1 a1) (/.f64 a1 (.f64 a2 (.f64 a2 a2))) (/.f64 (.f64 a1 a1) (.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 a1 a2)))
(* -1 (pow a2 4))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) a2)))) a2)) 1))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) a2)) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)))) a2)) 1))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (.f64 th th) (fma.f64 th (.f64 th (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* (pow a2 2) (sqrt 2)))
(.f64 a2 (neg.f64 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (* (sqrt 2) (+ a2 (* -1 a2)))))
(.f64 a2 (neg.f64 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2))))))
(-.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2))))))
(-.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (sqrt 2))
(.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (+.f64 a1 #s(literal 0 binary64)))
(* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))))
(fma.f64 (.f64 a1 a1) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))
(* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))))
(fma.f64 (.f64 a1 a1) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))
(* (pow a1 2) (sqrt 2))
(.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (+.f64 a1 #s(literal 0 binary64)))
(* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1))))
(.f64 (.f64 a1 a1) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))))
(* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1))))
(.f64 (.f64 a1 a1) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))))
(* (pow a1 2) (sqrt 2))
(.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+ (* a2 (* (sqrt 2) (+ a1 (* -1 a1)))) (* (pow a1 2) (sqrt 2)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (+.f64 a1 #s(literal 0 binary64)))
(+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2)))
(-.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2)))
(-.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* -1 (* (pow a2 2) (sqrt 2)))
(.f64 a2 (neg.f64 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2)))
(.f64 a2 (neg.f64 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 (.f64 a2 a2) (-.f64 (/.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 (.f64 a2 a2) (-.f64 (/.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* (pow a2 2) (sqrt 2)))
(.f64 a2 (neg.f64 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2))))
(.f64 a2 (neg.f64 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2))))
(.f64 (.f64 a2 a2) (-.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (/.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a2 a2)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2))))
(.f64 (.f64 a2 a2) (-.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (/.f64 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a2 a2)))))

rewrite327.0ms (2.8%)

Memory

5.8MiB live, 523.3MiB allocated

Rules

4 750×	`lower-/.f32`
4 734×	`lower-/.f64`
4 040×	`lower-*.f32`
4 026×	`lower-*.f64`
3 412×	`lower-fma.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	35	209
0	56	184
1	209	170
2	1772	170
0	8121	170

Stop Event

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

Counts

19 → 1 778

Calls

Call 1

Inputs
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.f64 a2 a2)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(cos.f64 th)
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))

Outputs
(+.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1 binary64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(-.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 a1 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (*.f64 a2 (cos.f64 th)))))
(fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))))
(neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(neg.f64 (/.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th)) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th))) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (+.f64 a1 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (+.f64 a1 a2))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64))) (neg.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th)))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))) (neg.f64 (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))) (neg.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (cos.f64 th))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (-.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))) #s(literal -1 binary64))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (cos.f64 th) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (.f64 (-.f64 a1 a2) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)))
(.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (.f64 a2 a2) (.f64 a1 a1))
(+.f64 (.f64 a1 a1) (.f64 a2 a2))
(-.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(-.f64 (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (-.f64 (.f64 a2 a2) (.f64 a1 a1))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (fma.f64 a2 (.f64 a2 (.f64 a2 a2)) (-.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (*.f64 a2 a2))))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (+.f64 a1 a2))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (fma.f64 a2 (.f64 a2 (.f64 a2 a2)) (-.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2)) (-.f64 a1 a2))
(/.f64 (-.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (-.f64 (.f64 a2 a2) (.f64 a1 a1)))
(/.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) (neg.f64 (+.f64 a1 a2)))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (neg.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2))) (neg.f64 (-.f64 a1 a2)))
(/.f64 (neg.f64 (-.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1))))
(pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))) #s(literal -1 binary64))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (-.f64 a1 a2) (-.f64 a1 a2)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (+.f64 a1 a2) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)))
(.f64 (-.f64 a1 a2) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (-.f64 a1 a2)))
(.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (/.f64 (-.f64 a1 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (+.f64 a1 a2))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (-.f64 a1 a2)) (-.f64 a1 a2))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a1 a2)) (-.f64 a1 a2)) (/.f64 (-.f64 a1 a2) (+.f64 a1 a2)))
(exp.f64 (log.f64 (*.f64 a2 a2)))
(pow.f64 a2 #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(*.f64 a2 a2)
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 th))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (cos.f64 th)))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (cos.f64 th))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (cos.f64 th))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (cos.f64 th)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 (neg.f64 (cos.f64 th)))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))
(pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))))
(+.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #s(literal 2 binary64))) (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #s(literal 2 binary64))) (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (/.f64 (-.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a2 a2)))) #s(literal 2 binary64))))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (/.f64 (-.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a2 a2)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64))) (neg.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (neg.f64 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) a1))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 a1) a1))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 a1 #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 a1 (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 #s(literal 1 binary64) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 a1) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) a1)) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 a1 a1))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) #s(literal 1 binary64))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (neg.f64 (.f64 a1 a1)))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 a1 #s(literal 1 binary64)))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 a1 (neg.f64 a1)))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) a1))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (neg.f64 a1) a1))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) a1)) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (+.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 a1 a1))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 1 binary64))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (neg.f64 (.f64 a1 a1)))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 a1 #s(literal 1 binary64)))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 a1 (neg.f64 a1)))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 #s(literal 1 binary64) a1))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (neg.f64 a1) a1))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) a1))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (neg.f64 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 a1) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 a1))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (.f64 a1 a1)))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 #s(literal 1 binary64)))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (neg.f64 a1)))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) a1))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 a1) a1))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal -1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)))))
(/.f64 (fma.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) #s(literal -1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (neg.f64 (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal -1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal -1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 a1 a1)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a2 a2))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (neg.f64 (neg.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #s(literal 2 binary64))) (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64))) #s(literal -1 binary64))
(.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (neg.f64 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a1 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 a1 #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a1 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 a1) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) a1) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 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)))
(+.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1 binary64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(-.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 a1 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (*.f64 a2 (cos.f64 th)))))
(fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))))
(neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(neg.f64 (/.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th)) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th))) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (+.f64 a1 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (+.f64 a1 a2))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64))) (neg.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th)))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))) (neg.f64 (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))) (neg.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (cos.f64 th))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (-.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))) #s(literal -1 binary64))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (cos.f64 th) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (.f64 (-.f64 a1 a2) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)))
(.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(+.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1 binary64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(-.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 a1 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (*.f64 a2 (cos.f64 th)))))
(fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))))
(neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(neg.f64 (/.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th)) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th))) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (+.f64 a1 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (+.f64 a1 a2))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64))) (neg.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th)))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))) (neg.f64 (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))) (neg.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (cos.f64 th))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (-.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))) #s(literal -1 binary64))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (cos.f64 th) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (.f64 (-.f64 a1 a2) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)))
(.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal 1 binary64)))
(exp.f64 (.f64 (log.f64 (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th))))))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64))
(/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th))))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1 binary64))
(/.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (cos.f64 th)))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))))
(/.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (cos.f64 th))
(/.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th))))))
(/.f64 (neg.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))) (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (fma.f64 a1 a1 (.f64 a2 a2)))) (neg.f64 (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (cos.f64 th)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64))
(pow.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal 1 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1 binary64)))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1 binary64)))
(.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64))
(.f64 (+.f64 a1 a2) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(.f64 #s(literal -1 binary64) (pow.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64)))
(.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1 binary64)))
(.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (pow.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)))
(.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 (+.f64 a1 a2) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 (+.f64 a1 a2) (cos.f64 th)) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 (+.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (cos.f64 th)))
(.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (pow.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (pow.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (pow.f64 (.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(.f64 (pow.f64 (+.f64 a1 a2) #s(literal 1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) #s(literal 1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)) #s(literal 1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)) #s(literal 1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (cos.f64 th)) #s(literal 1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (cos.f64 th)) #s(literal 1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)) (pow.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) #s(literal 1 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal 1 binary64)) (pow.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 1 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (pow.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (pow.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal -1 binary64)))
(.f64 (pow.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) #s(literal -1 binary64)) (pow.f64 (.f64 (-.f64 a1 a2) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2)) #s(literal -1 binary64)) (pow.f64 (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(.f64 (pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))))
(.f64 (pow.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(.f64 (pow.f64 (.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(.f64 (pow.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(.f64 (pow.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(+.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (.f64 a2 (cos.f64 th))))
(+.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (.f64 a1 (.f64 a1 (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (-.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (/.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (-.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(fma.f64 a1 (.f64 a1 (cos.f64 th)) (.f64 a2 (*.f64 a2 (cos.f64 th))))
(fma.f64 a2 (.f64 a2 (cos.f64 th)) (.f64 a1 (*.f64 a1 (cos.f64 th))))
(fma.f64 (.f64 a2 a2) (cos.f64 th) (.f64 a1 (*.f64 a1 (cos.f64 th))))
(fma.f64 (cos.f64 th) (.f64 a2 a2) (.f64 a1 (*.f64 a1 (cos.f64 th))))
(fma.f64 (cos.f64 th) (.f64 a1 a1) (.f64 a2 (*.f64 a2 (cos.f64 th))))
(fma.f64 (.f64 a1 a1) (cos.f64 th) (.f64 a2 (*.f64 a2 (cos.f64 th))))
(fma.f64 (.f64 (cos.f64 th) a2) a2 (.f64 a1 (*.f64 a1 (cos.f64 th))))
(fma.f64 (.f64 (cos.f64 th) a1) a1 (.f64 a2 (*.f64 a2 (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))))
(/.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (neg.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (+.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (*.f64 a2 (cos.f64 th)))))))
(/.f64 (-.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (-.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (.f64 a2 (cos.f64 th)))))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (+.f64 a1 a2)) (-.f64 a1 a2))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (-.f64 a1 a2)) (+.f64 a1 a2))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (*.f64 a2 (cos.f64 th))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (+.f64 a1 a2))) (neg.f64 (-.f64 a1 a2)))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (-.f64 a1 a2))) (neg.f64 (+.f64 a1 a2)))
(/.f64 (+.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (.f64 a1 (*.f64 a1 (cos.f64 th)))))))
(pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (+.f64 a1 a2)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (-.f64 a1 a2)))
(.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a1 a2)))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (-.f64 a1 a2)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (-.f64 a1 a2)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2)))
(.f64 (/.f64 (cos.f64 th) (-.f64 a1 a2)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2)))
(+.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1 binary64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(-.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 a1 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (*.f64 a2 (cos.f64 th)))))
(fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))))
(neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(neg.f64 (/.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th)) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th))) (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (+.f64 a1 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (.f64 a1 (.f64 a1 (cos.f64 th)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (+.f64 a1 a2))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64))) (neg.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th)))) (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))) (neg.f64 (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))) (neg.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (cos.f64 th))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (-.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (cos.f64 th)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 a2 (cos.f64 th))))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))) #s(literal -1 binary64))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (cos.f64 th) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(.f64 (.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(.f64 (+.f64 (pow.f64 (/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (.f64 (-.f64 a1 a2) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(.f64 (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal -1/2 binary64)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)))
(.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (.f64 (-.f64 a1 a2) (cos.f64 th)))
(.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) (-.f64 a1 a2))
(+.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (neg.f64 (.f64 a2 a2)) (.f64 a2 a2)))
(+.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (neg.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2)))))
(+.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 a2)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a1 a1)))
(+.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a1 a1)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 a2)))
(+.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (neg.f64 a2)))
(+.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(+.f64 (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(+.f64 (.f64 a1 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) (.f64 (neg.f64 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))))
(-.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a2 (.f64 a2 (.f64 a2 a2))))
(-.f64 (/.f64 (.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (fma.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))) (/.f64 (.f64 (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (fma.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))))
(-.f64 (/.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (/.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))
(fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (neg.f64 (.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (neg.f64 (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))
(fma.f64 a1 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (.f64 (neg.f64 a2) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a1 a2))))
(fma.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 a1 a1) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(fma.f64 (.f64 a1 a1) (.f64 a1 a1) (.f64 (neg.f64 (.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (.f64 a1 a1) (.f64 a1 a1) (neg.f64 (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(fma.f64 (.f64 a1 (.f64 a1 a1)) a1 (.f64 (neg.f64 (.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (.f64 a1 (.f64 a1 a1)) a1 (neg.f64 (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 a2) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 a1 a1)))
(fma.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a1 a1) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 a2 a2)))
(fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) a1 (.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a1 a2)) (neg.f64 a2)))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (-.f64 (.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (fma.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))
(/.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))
(/.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 (+.f64 a1 a2))) (-.f64 a1 a2))) (fma.f64 a1 a1 (.f64 a2 (+.f64 a1 a2))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))) (neg.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (fma.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (neg.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 (+.f64 a1 a2))) (-.f64 a1 a2)))) (neg.f64 (fma.f64 a1 a1 (.f64 a2 (+.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (+.f64 a1 a2)))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (pow.f64 (.f64 (neg.f64 (.f64 a2 a2)) (.f64 a2 a2)) #s(literal 3 binary64))) (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (-.f64 (.f64 (.f64 (neg.f64 (.f64 a2 a2)) (.f64 a2 a2)) (.f64 (neg.f64 (.f64 a2 a2)) (.f64 a2 a2))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (neg.f64 (.f64 a2 a2)) (*.f64 a2 a2))))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (pow.f64 (neg.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2)))) #s(literal 3 binary64))) (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (-.f64 (.f64 (neg.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (neg.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (neg.f64 (.f64 a2 (.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a1 a1)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 a2)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 a2)) (-.f64 (.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a1 a1)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a1 a1))) (.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 a2)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a1 a1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 a2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a1 a1)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a1 a1)) (-.f64 (.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 a2)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 a2))) (.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a1 a1)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) a1) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (neg.f64 a2)) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) a1) (-.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (neg.f64 a2)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (neg.f64 a2))) (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (neg.f64 a2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (-.f64 (.f64 (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (-.f64 (.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))))
(/.f64 (+.f64 (pow.f64 (.f64 a1 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) #s(literal 3 binary64))) (fma.f64 (.f64 a1 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) (.f64 a1 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) (-.f64 (.f64 (.f64 (neg.f64 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) (.f64 (neg.f64 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)))) (.f64 (.f64 a1 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) (.f64 (neg.f64 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)))))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(.f64 (+.f64 a1 a2) (.f64 (-.f64 a1 a2) (fma.f64 a1 a1 (*.f64 a2 a2))))
(.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a1 a2)))
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a1 a2)) (-.f64 a1 a2))
(.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (-.f64 a1 a2)) (+.f64 a1 a2))
(cos.f64 th)
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal -1 binary64)))
(exp.f64 (-.f64 (log.f64 (.f64 a2 a2)) (.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 a2 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (neg.f64 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 (.f64 (fma.f64 a1 (.f64 a1 a1) (.f64 a2 (.f64 a2 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) (fma.f64 a1 a1 (.f64 a2 (-.f64 a2 a1))))
(/.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) (-.f64 a1 a2))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 (.f64 a1 a1) (.f64 a2 (.f64 a2 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))) (neg.f64 (fma.f64 a1 a1 (.f64 a2 (-.f64 a2 a1)))))
(/.f64 (neg.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))) (neg.f64 (-.f64 a1 a2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(.f64 (+.f64 a1 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(.f64 (-.f64 a1 a2) (.f64 (+.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (+.f64 a1 a2))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 a1 a2)) (-.f64 a1 a2))

eval325.0ms (2.8%)

Memory: -3.0MiB live, 769.7MiB allocated
Compiler: Compiled 70 639 to 3 336 computations (95.3% saved)

prune276.0ms (2.4%)

Memory

6.6MiB live, 669.7MiB allocated

Pruning

26 alts after pruning (26 fresh and 0 done)

	Pruned	Kept	Total
New	2 593	22	2 615
Fresh	6	4	10
Picked	5	0	5
Done	0	0	0
Total	2 604	26	2 630

Accuracy

100.0%

Counts

2 630 → 26

Alt Table

Click to see full alt table

Status	Accuracy	Program
	65.8%	(/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (sqrt 2) (cos th)) (.f64 (fma.f64 (*.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
	27.0%	(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
▶	99.7%	(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
	99.1%	(/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
	17.1%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	99.4%	(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
▶	98.7%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
	70.9%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1)))))
	99.2%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))) (*.f64 a2 a2)))
	68.2%	(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
	99.1%	(.f64 (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
	99.4%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (cos.f64 th))
	99.6%	(.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
▶	44.4%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
	70.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
	99.1%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
	70.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	70.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	41.3%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 th th)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
	70.7%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
▶	70.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
	99.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
	53.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
	70.5%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
▶	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	38.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))))

Compiler

Compiled 1 000 to 598 computations (40.2% saved)

simplify149.0ms (1.3%)

Memory

-3.0MiB live, 155.8MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
cost-diff	0	(sqrt.f64 #s(literal 2 binary64))
cost-diff	0	(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
cost-diff	704	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
cost-diff	0	(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
cost-diff	0	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
cost-diff	1344	(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
cost-diff	2048	(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff	0	(*.f64 a1 a1)
cost-diff	0	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
cost-diff	384	(/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
cost-diff	960	(fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
cost-diff	0	(*.f64 a1 a1)
cost-diff	0	(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
cost-diff	0	#s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
cost-diff	0	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff	0	(*.f64 a2 a2)
cost-diff	0	(fma.f64 a1 a1 (*.f64 a2 a2))
cost-diff	0	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))
cost-diff	0	(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))

Rules

3 124×	`lower-fma.f32`
3 114×	`lower-fma.f64`
2 070×	`lower-*.f32`
2 054×	`lower-*.f64`
744×	`associate-r`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	49	413
0	79	399
1	128	390
2	216	388
3	439	388
4	847	388
5	1284	376
6	1587	360
7	1872	360
8	2226	360
9	2494	358
10	2759	358
11	3000	358
12	3083	358
13	3129	358
14	3129	358
15	3131	358
16	3131	358
17	3133	358
18	3133	358
19	3133	358
20	3245	358
21	3350	358
0	3350	355

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

Inputs
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
(fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
(*.f64 a2 a2)
a2
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
a1
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))))
th
(.f64 th (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1/2 binary64)))
(.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
#s(literal -1/2 binary64)
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
#s(literal 1 binary64)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
(cos.f64 th)
th
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
(*.f64 a2 a2)
a2

Outputs
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 a2)
a2
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
a1
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
th
(.f64 th (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1/2 binary64)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 th #s(literal -1/2 binary64)))
(.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.f64 a1 a1)
#s(literal -1/2 binary64)
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
#s(literal 1 binary64)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
(cos.f64 th)
th
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
(*.f64 a2 a2)
a2

localize195.0ms (1.7%)

Memory

-11.4MiB live, 309.0MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.06640625	(.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
accuracy	0.31603028531661925	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
accuracy	0.3954781033826098	#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
accuracy	1.002650974688637	(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
accuracy	2.812469723661162	(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
accuracy	5.499616233274698	(.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))))
accuracy	7.875047940268515	(.f64 th (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1/2 binary64)))
accuracy	20.217564695627214	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
accuracy	0	(sqrt.f64 #s(literal 2 binary64))
accuracy	0.00390625	(fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
accuracy	0.20998002930532605	(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
accuracy	18.512528610816325	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
accuracy	0	(sqrt.f64 #s(literal 2 binary64))
accuracy	0.21941376953688402	(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
accuracy	18.512528610816325	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
accuracy	53.787117940124965	#s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0	(cos.f64 th)
accuracy	0.00390625	(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy	0.06640625	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))
accuracy	0.19207001953688402	(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))

Samples

112.0ms

256×

valid

Compiler

Compiled 348 to 42 computations (87.9% saved)

Precisions

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

ival-div: 51.0ms (59.2% of total)

ival-mult: 19.0ms (22.1% of total)

ival-add: 8.0ms (9.3% of total)

ival-cos: 5.0ms (5.8% of total)

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

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

exact: 0.0ms (0% of total)

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

series183.0ms (1.6%)

Memory

-1.0MiB live, 118.1MiB allocated

Counts

24 → 624

Calls

Call 1

Inputs
#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())
#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())
#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())
#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(literal 2 binary64)) (patch (sqrt.f64 #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())
#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())
#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())
#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())

Outputs
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (.f64 a2 a2) (patch (.f64 a2 a2) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ ( a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (patch (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 2 binary64))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))))) (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))))) (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))))) (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))))) (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))))) (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))))) (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (taylor inf th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor inf th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor inf th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor inf th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (taylor -inf th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor -inf th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor -inf th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor -inf th) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (/ (pow a1 2) (sqrt 2))) (taylor 0 th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (/ (pow a1 2) (sqrt 2))) (taylor 0 th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (/ (pow a1 2) (sqrt 2))) (taylor 0 th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (taylor inf th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2))))) (taylor inf th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2))))) (taylor inf th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2))))) (taylor inf th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (taylor -inf th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2))))) (taylor -inf th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2))))) (taylor -inf th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2))))) (taylor -inf th) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* (pow th 2) (sqrt 2)) (+ (pow a1 2) (pow a2 2)))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (+ (* 1/48 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (sqrt 2) (* (pow a2 2) (cos th)))) (taylor 0 a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 6) (cos th))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th)))) (taylor 0 a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a2 6) (cos th)))))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th)))) (taylor 0 a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a1 2) (cos th))) (taylor inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a1 2) (cos th))) (taylor -inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a1 2) (cos th))) (taylor 0 a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (sqrt 2) (* (pow a1 2) (cos th)))) (taylor 0 a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 6) (cos th))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th)))) (taylor 0 a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (* (pow a2 2) (- (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a1 6) (cos th)))))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th)))) (taylor 0 a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a2 2) (cos th))) (taylor inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2)) (taylor inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2)) (taylor inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2)) (taylor inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) (* (pow a2 2) (cos th))) (taylor -inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2)) (taylor -inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2)) (taylor -inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2)) (taylor -inf a2) (#s(alt (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)))) (patch (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2))) (patch (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* th (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a1 2) th)) (taylor 0 a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th))) (taylor 0 a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th))) (taylor 0 a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th))) (taylor 0 a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a2 2) th)) (taylor inf a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a2 2) th)) (taylor -inf a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a2 2) th)) (taylor 0 a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th))) (taylor 0 a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th))) (taylor 0 a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th))) (taylor 0 a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a1 2) th)) (taylor inf a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a1 2) th)) (taylor -inf a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) (patch (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a1 2) (pow th 2))) (taylor 0 a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a2 2) (pow th 2))) (taylor inf a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor inf a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor inf a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor inf a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a2 2) (pow th 2))) (taylor -inf a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor -inf a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor -inf a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor -inf a2) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a2 2) (pow th 2))) (taylor 0 a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a1 2) (pow th 2))) (taylor inf a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor inf a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor inf a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor inf a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a1 2) (pow th 2))) (taylor -inf a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor -inf a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor -inf a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor -inf a1) (#s(alt (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (patch (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (patch #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())

Calls

156 calls:

Time	Variable		Point	Expression
69.0ms	a1	@	0	(+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))))
6.0ms	th	@	0	(* th (* (+ (* a2 a2) (* a1 a1)) -1/2))
1.0ms	a2	@	0	(+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))))
1.0ms	a1	@	inf	(+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))))
1.0ms	th	@	0	(+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))))

simplify548.0ms (4.7%)

Memory

12.5MiB live, 610.3MiB allocated

Algorithm

1×	egg-herbie

Rules

17 750×	`lower-fma.f64`
17 750×	`lower-fma.f32`
6 006×	`lower-*.f64`
6 006×	`lower-*.f32`
5 064×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	325	10552
1	1101	9848
2	4101	9286
0	8063	8688

Stop Event

1×	iter limit
1×	node limit

Counts

624 → 624

Calls

Call 1

Inputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(* (pow a2 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(+ (pow a1 2) (pow a2 2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(* (pow a2 2) (sqrt 2))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(* (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (sqrt 2))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))
(+ (* 1/2 (/ (* (pow th 2) (sqrt 2)) (+ (pow a1 2) (pow a2 2)))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (+ (* 1/48 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(+ (* (pow a1 2) (- (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 6) (cos th))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(+ (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a2 6) (cos th)))))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2))
(/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2))
(/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(+ (* (pow a2 2) (- (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 6) (cos th))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(+ (* (pow a2 2) (- (* (pow a2 2) (- (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a1 6) (cos th)))))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2))
(/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2))
(/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (pow a2 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (sqrt 2))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow a1 2) th))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(* -1/2 (* (pow a2 2) th))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(* -1/2 (* (pow a2 2) th))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(* -1/2 (* (pow a2 2) th))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(* -1/2 (* (pow a1 2) th))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(* -1/2 (* (pow a1 2) th))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow a1 2) (pow th 2)))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(* -1/2 (* (pow a2 2) (pow th 2)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* -1/2 (* (pow a2 2) (pow th 2)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* -1/2 (* (pow a2 2) (pow th 2)))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(* -1/2 (* (pow a1 2) (pow th 2)))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(* -1/2 (* (pow a1 2) (pow th 2)))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))

Outputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (fma.f64 (/.f64 (.f64 th (.f64 th (fma.f64 a1 a1 (.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (cos th))
(.f64 a2 (.f64 a2 (cos.f64 th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (pow a1 2) (cos th))
(.f64 (cos.f64 th) (.f64 a1 a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (cos th))
(.f64 (cos.f64 th) (.f64 a1 a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (cos th))
(.f64 (cos.f64 th) (.f64 a1 a1))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (pow a2 2) (cos th))
(.f64 a2 (.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (cos th))
(.f64 a2 (.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (.f64 th (.f64 th (fma.f64 a1 a1 (.f64 a2 a2)))) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 th th) (.f64 (.f64 th th) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 a2 (fma.f64 a2 (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 a2 (fma.f64 a2 (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 a2 (fma.f64 a2 (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 a2 (fma.f64 a2 (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 a2 (fma.f64 a2 (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 a2 (fma.f64 a2 (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (pow a1 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 (.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 (.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 (.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 (.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 (.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 (.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 th th) (.f64 (.f64 th th) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(/.f64 (.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(.f64 (.f64 th th) (fma.f64 a2 (/.f64 a2 (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(.f64 (.f64 th th) (fma.f64 a2 (/.f64 a2 (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(.f64 (.f64 th th) (fma.f64 a2 (/.f64 a2 (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(/.f64 (.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(.f64 (.f64 th th) (fma.f64 a2 (/.f64 a2 (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(.f64 (.f64 th th) (fma.f64 a2 (/.f64 a2 (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(.f64 (.f64 th th) (fma.f64 a2 (/.f64 a2 (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64))))))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(/.f64 (.f64 (.f64 a2 a2) (.f64 th (.f64 th #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 th (.f64 th (fma.f64 a1 a1 (.f64 a2 a2))))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 th (.f64 th (fma.f64 a1 a1 (.f64 a2 a2))))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 th (.f64 th (fma.f64 a1 a1 (.f64 a2 a2))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(/.f64 (.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(.f64 (.f64 th th) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(.f64 (.f64 th th) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(.f64 (.f64 th th) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64)))))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(/.f64 (.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(.f64 (.f64 th th) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(.f64 (.f64 th th) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(.f64 (.f64 th th) (fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 th (.f64 th (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 th (.f64 th (fma.f64 a1 a1 (.f64 a2 a2))))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 th (.f64 th (fma.f64 a1 a1 (.f64 a2 a2))))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 th (.f64 th (fma.f64 a1 a1 (.f64 a2 a2))))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(/.f64 (.f64 (.f64 a2 a2) (.f64 th (.f64 th #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(.f64 a2 (.f64 a2 (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(.f64 a2 (.f64 a2 (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(.f64 a2 (.f64 a2 (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(/.f64 (.f64 (.f64 a2 a2) (.f64 th (.f64 th #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(.f64 a2 (.f64 a2 (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(.f64 a2 (.f64 a2 (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))))
(.f64 a2 (.f64 a2 (fma.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (fma.f64 (/.f64 (.f64 th (.f64 th (fma.f64 a1 a1 (.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (fma.f64 (/.f64 (.f64 th (.f64 th (fma.f64 a1 a1 (.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64))))
(/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* 1/2 (/ (* (pow th 2) (sqrt 2)) (+ (pow a1 2) (pow a2 2)))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(fma.f64 (.f64 th th) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 #s(literal -5/24 binary64) (.f64 th th) #s(literal -1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (+ (* 1/48 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))) (+ (* -1/4 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (* -1/2 (/ (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (/ (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -61/720 binary64)) (neg.f64 (.f64 th th))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 #s(literal -5/24 binary64) (.f64 th th) #s(literal -1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
(/ (sqrt 2) (* (cos th) (+ (pow a1 2) (pow a2 2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))
(+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th)))))
(+ (* (pow a1 2) (- (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 6) (cos th))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(fma.f64 a1 (.f64 a1 (-.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))))
(+ (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a2 6) (cos th)))))) (/ (sqrt 2) (* (pow a2 4) (cos th))))) (/ (sqrt 2) (* (pow a2 2) (cos th))))
(fma.f64 a1 (.f64 a1 (-.f64 (.f64 (neg.f64 (.f64 a1 a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 (/.f64 a1 (pow.f64 a2 #s(literal 8 binary64))) (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 6 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))
(/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2))
(/.f64 (.f64 (fma.f64 (neg.f64 a2) (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2))
(/.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (neg.f64 (/.f64 a2 (.f64 a1 a1))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64)))) (*.f64 a1 a1))
(/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (neg.f64 (/.f64 a2 (.f64 a1 a1))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (.f64 (cos.f64 th) (neg.f64 (pow.f64 a1 #s(literal 6 binary64)))))) (.f64 a1 a1))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))
(/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a1 2))
(/.f64 (.f64 (fma.f64 (neg.f64 a2) (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th)))) (pow a1 2))
(/.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (neg.f64 (/.f64 a2 (.f64 a1 a1))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64)))) (*.f64 a1 a1))
(/ (- (+ (* -1 (/ (* (pow a2 6) (sqrt 2)) (* (pow a1 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 2) (cos th))))) (pow a1 2))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (neg.f64 (/.f64 a2 (.f64 a1 a1))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (.f64 (cos.f64 th) (neg.f64 (pow.f64 a1 #s(literal 6 binary64)))))) (.f64 a1 a1))
(/ (sqrt 2) (* (pow a1 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))
(+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 4) (cos th)))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))))
(+ (* (pow a2 2) (- (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 6) (cos th))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(fma.f64 (.f64 a2 a2) (-.f64 (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))))
(+ (* (pow a2 2) (- (* (pow a2 2) (- (* -1 (/ (* (pow a2 2) (sqrt 2)) (* (pow a1 8) (cos th)))) (* -1 (/ (sqrt 2) (* (pow a1 6) (cos th)))))) (/ (sqrt 2) (* (pow a1 4) (cos th))))) (/ (sqrt 2) (* (pow a1 2) (cos th))))
(fma.f64 (.f64 a2 a2) (fma.f64 (neg.f64 (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (/.f64 a2 (pow.f64 a1 #s(literal 8 binary64))) (/.f64 #s(literal -1 binary64) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))
(/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2))
(/.f64 (.f64 (fma.f64 (neg.f64 a1) (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2))
(/.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 (neg.f64 (/.f64 a1 (.f64 a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 1 binary64)))) (*.f64 a2 a2))
(/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 (neg.f64 (/.f64 a1 (.f64 a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 1 binary64))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 6 binary64)))))) (.f64 a2 a2))
(/ (sqrt 2) (* (pow a2 2) (cos th)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 (cos.f64 th))))
(/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (/ (sqrt 2) (cos th))) (pow a2 2))
(/.f64 (.f64 (fma.f64 (neg.f64 a1) (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(/ (- (+ (/ (sqrt 2) (cos th)) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th)))) (pow a2 2))
(/.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 (neg.f64 (/.f64 a1 (.f64 a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 1 binary64)))) (*.f64 a2 a2))
(/ (- (+ (* -1 (/ (* (pow a1 6) (sqrt 2)) (* (pow a2 6) (cos th)))) (/ (sqrt 2) (cos th))) (+ (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (cos th)))) (/ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (cos th))))) (pow a2 2))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 (neg.f64 (/.f64 a1 (.f64 a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 1 binary64))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 6 binary64)))))) (.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (.f64 th (.f64 th (fma.f64 a1 a1 (.f64 a2 a2)))) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (pow a2 2) (cos th))
(.f64 a2 (.f64 a2 (cos.f64 th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (pow a1 2) (cos th))
(.f64 (cos.f64 th) (.f64 a1 a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (cos th))
(.f64 (cos.f64 th) (.f64 a1 a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 a1 a1)) (cos.f64 th)))
(* (pow a1 2) (cos th))
(.f64 (cos.f64 th) (.f64 a1 a1))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (pow a2 2) (cos th))
(.f64 a2 (.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (cos th))
(.f64 a2 (.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (cos.f64 th)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (.f64 th th) (fma.f64 th (.f64 th (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* th (+ (pow a1 2) (pow a2 2))))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow a1 2) th))
(.f64 a1 (.f64 a1 (*.f64 th #s(literal -1/2 binary64))))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow a2 2) th))
(.f64 th (.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 th (*.f64 a2 a2)) th))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 th (*.f64 a2 a2)) th))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 th (*.f64 a2 a2)) th))
(* -1/2 (* (pow a2 2) th))
(.f64 th (.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 th (*.f64 a2 a2)) th))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 th (*.f64 a2 a2)) th))
(* (pow a2 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a1 2) th) (pow a2 2)))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 th (*.f64 a2 a2)) th))
(* -1/2 (* (pow a2 2) th))
(.f64 th (.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(+ (* -1/2 (* (pow a1 2) th)) (* -1/2 (* (pow a2 2) th)))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow a1 2) th))
(.f64 a1 (.f64 a1 (*.f64 th #s(literal -1/2 binary64))))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 th (*.f64 a1 a1)) th)))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 th (*.f64 a1 a1)) th)))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 th (*.f64 a1 a1)) th)))
(* -1/2 (* (pow a1 2) th))
(.f64 a1 (.f64 a1 (*.f64 th #s(literal -1/2 binary64))))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 th (*.f64 a1 a1)) th)))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 th (*.f64 a1 a1)) th)))
(* (pow a1 2) (+ (* -1/2 th) (* -1/2 (/ (* (pow a2 2) th) (pow a1 2)))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 th (*.f64 a1 a1)) th)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow a1 2) (pow th 2)))
(.f64 (.f64 a1 a1) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow a2 2) (pow th 2)))
(.f64 (.f64 a2 a2) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 th (/.f64 th (.f64 a2 a2)))) (*.f64 th th)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 th (/.f64 th (.f64 a2 a2)))) (*.f64 th th)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 th (/.f64 th (.f64 a2 a2)))) (*.f64 th th)))
(* -1/2 (* (pow a2 2) (pow th 2)))
(.f64 (.f64 a2 a2) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 th (/.f64 th (.f64 a2 a2)))) (*.f64 th th)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 th (/.f64 th (.f64 a2 a2)))) (*.f64 th th)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 th (/.f64 th (.f64 a2 a2)))) (*.f64 th th)))
(* -1/2 (* (pow a2 2) (pow th 2)))
(.f64 (.f64 a2 a2) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow a1 2) (pow th 2)))
(.f64 (.f64 a1 a1) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 a2 (.f64 a2 (.f64 th (/.f64 th (.f64 a1 a1)))) (*.f64 th th))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 a2 (.f64 a2 (.f64 th (/.f64 th (.f64 a1 a1)))) (*.f64 th th))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 a2 (.f64 a2 (.f64 th (/.f64 th (.f64 a1 a1)))) (*.f64 th th))))
(* -1/2 (* (pow a1 2) (pow th 2)))
(.f64 (.f64 a1 a1) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 a2 (.f64 a2 (.f64 th (/.f64 th (.f64 a1 a1)))) (*.f64 th th))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 a2 (.f64 a2 (.f64 th (/.f64 th (.f64 a1 a1)))) (*.f64 th th))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 a1 a1) (.f64 #s(literal -1/2 binary64) (fma.f64 a2 (.f64 a2 (.f64 th (/.f64 th (.f64 a1 a1)))) (*.f64 th th))))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))

rewrite490.0ms (4.2%)

Memory

-2.2MiB live, 555.9MiB allocated

Rules

5 252×	`lower-/.f32`
5 236×	`lower-/.f64`
4 214×	`lower-*.f32`
4 198×	`lower-*.f64`
4 046×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	49	340
0	79	325
1	282	305
2	2460	304
0	8141	301

Stop Event

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

Counts

24 → 935

Calls

Call 1

Inputs
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.f64 a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 a1)
(fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(sqrt.f64 #s(literal 2 binary64))
(.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
(cos.f64 th)
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
(.f64 th (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1/2 binary64)))
(.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64))))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))

Outputs
(+.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -1 binary64)))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (pow.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(-.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 (.f64 (pow.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 a1 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 #s(literal 1 binary64)) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 #s(literal 1 binary64)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))))
(/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))
(/.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th)) (.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th)) (.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64)) (.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th))) (.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th))) (.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (cos.f64 th)) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 1 binary64)) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (neg.f64 (cos.f64 th))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (cos.f64 th))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th))) (neg.f64 (.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th))) (neg.f64 (.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (cos.f64 th))) (neg.f64 (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))) (neg.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64))) (neg.f64 (.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64))) (neg.f64 (.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th)))) (neg.f64 (.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (cos.f64 th)))) (neg.f64 (.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 1 binary64))) (neg.f64 (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (neg.f64 (cos.f64 th)))) (neg.f64 (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64))) (neg.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (cos.f64 th)))) (neg.f64 (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))) (neg.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (cos.f64 th))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (.f64 (pow.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)))
(.f64 (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(.f64 (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
(.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (+.f64 (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (pow.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (.f64 (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (/.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))))
(.f64 (/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (+.f64 a2 a1)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 a1)))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(.f64 (/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(.f64 (/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))
(.f64 (/.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(.f64 (/.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))
(.f64 (/.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 a1)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (-.f64 a2 a1)))
(.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (-.f64 a1 a2)))
(+.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (.f64 (cos.f64 th) (.f64 a1 a1)))
(+.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (.f64 (.f64 a2 a2) (cos.f64 th)))
(fma.f64 (.f64 a2 a2) (cos.f64 th) (.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (cos.f64 th) (.f64 a2 a2) (.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (cos.f64 th) (.f64 a1 a1) (.f64 (*.f64 a2 a2) (cos.f64 th)))
(fma.f64 (.f64 a1 a1) (cos.f64 th) (.f64 (*.f64 a2 a2) (cos.f64 th)))
(fma.f64 (.f64 (cos.f64 th) a1) a1 (.f64 (*.f64 a2 a2) (cos.f64 th)))
(fma.f64 (.f64 (cos.f64 th) a2) a2 (.f64 (cos.f64 th) (*.f64 a1 a1)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th)) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th)) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th))) (neg.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (cos.f64 th))) (neg.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (cos.f64 th))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (+.f64 a2 a1)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (-.f64 a2 a1)))
(.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (-.f64 a1 a2)))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (+.f64 a2 a1)) (/.f64 (cos.f64 th) (-.f64 a2 a1)))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (-.f64 a1 a2)))
(+.f64 (.f64 a2 a2) (.f64 a1 a1))
(+.f64 (.f64 a1 a1) (.f64 a2 a2))
(-.f64 (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(-.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (neg.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (neg.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (neg.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (neg.f64 (neg.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (neg.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(pow.f64 (/.f64 (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64))
(.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (.f64 a2 (.f64 a2 (*.f64 a2 a2))))))
(.f64 (fma.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a2 a1)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 a2 a1)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 a1 a2)))
(exp.f64 (log.f64 (*.f64 a2 a2)))
(pow.f64 a2 #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(*.f64 a2 a2)
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) #s(literal -1 binary64)))
(exp.f64 (-.f64 (log.f64 (.f64 a1 a1)) (.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 a1 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (neg.f64 (*.f64 a1 #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (neg.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a1)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a1)))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (neg.f64 (.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 a1 a1)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) a1)))
(*.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 a1) #s(literal -1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (log.f64 (*.f64 a1 a1)))
(pow.f64 a1 #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(*.f64 a1 a1)
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(+.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(fma.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2) (.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1) (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (fma.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))))) (neg.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (neg.f64 (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(pow.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) #s(literal -1 binary64))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))))
(.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(+.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -2 binary64)))
(-.f64 (/.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 2 binary64)) (/.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 2 binary64)))
(-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(-.f64 (/.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a1)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 a1 a1)) #s(literal -1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) a1)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 a2) #s(literal -1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 a1) #s(literal -1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -2 binary64)))
(/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (fma.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (neg.f64 (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (neg.f64 (fma.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a1 a1) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64))) (neg.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) (neg.f64 (.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) (neg.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #s(literal 1/2 binary64))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a2 a2))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 a2 a2)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) #s(literal 1 binary64)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (neg.f64 (.f64 a2 a2))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 a1 a1)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (.f64 a1 a1))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 a1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (neg.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(pow.f64 (/.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64))) #s(literal -1 binary64))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))
(.f64 #s(literal 1 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))))
(.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(.f64 (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))))
(.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))))
(+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (-.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1)))) (-.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1)))) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1))))
(fma.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))))
(fma.f64 th (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a1)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a1)) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (.f64 th (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))))
(fma.f64 #s(literal 1 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))))
(fma.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 a2 a2)) #s(literal -1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal -1 binary64)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 a1 a1)) #s(literal -1 binary64)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 a1 a1)) #s(literal -1 binary64)) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) a2)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) a1)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) a1)) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 th th) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) th (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1))))
(fma.f64 (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 th (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 th (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (.f64 th th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 th th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1))))
(fma.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #s(literal 2 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 th #s(literal -1 binary64)) (/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) #s(literal -1 binary64)) (/.f64 (neg.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (.f64 th th) #s(literal -1 binary64)) (/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (neg.f64 a2) #s(literal -1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1))))
(fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (.f64 (.f64 th th) (fma.f64 a1 a1 (.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (.f64 (.f64 th th) #s(literal -1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th))) #s(literal -1 binary64)) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (neg.f64 th) #s(literal -1 binary64)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (neg.f64 (.f64 th th)) #s(literal -1 binary64)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (neg.f64 a1) #s(literal -1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (neg.f64 a1) #s(literal -1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (fma.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2)))) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))))))))
(/.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 (.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (-.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a2 a2) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))))) (-.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (.f64 a2 a2))) (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (neg.f64 (.f64 a2 a2)))) (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 a2)))) (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))))
(/.f64 (fma.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))) (.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)))))
(/.f64 (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))) (.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 (.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (-.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a2 a2) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1)))))) (neg.f64 (-.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1)))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64))) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (.f64 a2 a2)))) (neg.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) (neg.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)))))
(/.f64 (neg.f64 (fma.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (neg.f64 (.f64 a2 a2))))) (neg.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))) (neg.f64 (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))) (neg.f64 (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)))))
(/.f64 (neg.f64 (fma.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 a2))))) (neg.f64 (.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)))))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))) (neg.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) #s(literal 1 binary64)))) (neg.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))))
(/.f64 (neg.f64 (fma.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))))) (neg.f64 (.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))) (neg.f64 (.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))) (neg.f64 (.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))))) (neg.f64 (.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 (.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))))))) (neg.f64 (neg.f64 (-.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (fma.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1)))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))))
(pow.f64 (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1)))))) #s(literal -1 binary64))
(.f64 (fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)))))
(.f64 (-.f64 (.f64 (.f64 a2 (.f64 a2 (.f64 a2 a2))) #s(literal 1/2 binary64)) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 th (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a1)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (.f64 th (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal -1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 a1 a1)) #s(literal -1 binary64)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) a1)) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 th th) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) th (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 th (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 th (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 th th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 th th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 th #s(literal -1 binary64)) (/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) #s(literal -1 binary64)) (/.f64 (neg.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 th th) #s(literal -1 binary64)) (/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 #s(literal -1/2 binary64) th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (.f64 th th) (fma.f64 a1 a1 (.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 (.f64 th th) #s(literal -1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th))) #s(literal -1 binary64)) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 th) #s(literal -1 binary64)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 (.f64 th th)) #s(literal -1 binary64)) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 a1) #s(literal -1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (neg.f64 (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)))))
(/.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (fma.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)))))
(/.f64 (neg.f64 (fma.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 a1 a1)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1 binary64)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (neg.f64 (.f64 a1 a1))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a1 a1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))))))
(/.f64 (neg.f64 (fma.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) #s(literal 1 binary64)))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))))) (neg.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))) (neg.f64 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (neg.f64 (neg.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))))) (neg.f64 (neg.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(.f64 (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (*.f64 a1 a1)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 th th))))
(.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64) (.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a1 a1) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 th (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))))
(/.f64 (neg.f64 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 a2 #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a2 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 a2) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) a2) #s(literal -1 binary64)))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(/.f64 (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))) #s(literal -1 binary64))
(.f64 (cos.f64 th) (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))))
(.f64 (/.f64 (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))
(.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal -1/2 binary64)))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (cos.f64 th))
(.f64 (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (neg.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (neg.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (/.f64 (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)) (neg.f64 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)) (neg.f64 (cos.f64 th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))))
(/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 (.f64 #s(literal 1 binary64) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (cos.f64 th))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))))
(/.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th))))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) (neg.f64 (cos.f64 th)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal 1 binary64))
(pow.f64 (/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal 1 binary64)))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (pow.f64 (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))))
(.f64 (pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (.f64 a2 a2)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (cos.f64 th)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (cos.f64 th)))
(.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(.f64 (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))) #s(literal 1 binary64)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(.f64 (/.f64 #s(literal -1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(.f64 (/.f64 #s(literal -1 binary64) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(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)))
(.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th))
(cos.f64 th)
(exp.f64 (fma.f64 #s(literal 2 binary64) (log.f64 a2) (*.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) (log.f64 (*.f64 a2 a2))))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
(.f64 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 #s(literal -1/2 binary64) th))
(.f64 th (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(.f64 #s(literal -1/2 binary64) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) th))
(.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)) th)
(.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) th) #s(literal -1/2 binary64))
(.f64 (.f64 th #s(literal -1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) th)
(.f64 (.f64 th th) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th) (.f64 #s(literal -1/2 binary64) th))
(.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) th)) #s(literal -1/2 binary64))
(.f64 (.f64 (.f64 th th) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal -1/2 binary64))
(.f64 (.f64 (.f64 th th) #s(literal -1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))

eval479.0ms (4.1%)

Memory: 31.8MiB live, 532.5MiB allocated
Compiler: Compiled 47 478 to 2 776 computations (94.2% saved)

prune279.0ms (2.4%)

Memory

-21.9MiB live, 749.7MiB allocated

Pruning

32 alts after pruning (30 fresh and 2 done)

	Pruned	Kept	Total
New	1 670	23	1 693
Fresh	14	7	21
Picked	3	2	5
Done	0	0	0
Total	1 687	32	1 719

Accuracy

100.0%

Counts

1 719 → 32

Alt Table

Click to see full alt table

Status	Accuracy	Program
	65.8%	(/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (sqrt 2) (cos th)) (.f64 (fma.f64 (*.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
✓	99.7%	(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
	99.1%	(/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
	99.1%	(/.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
▶	17.1%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	70.5%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
	99.0%	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
	99.1%	(.f64 (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
▶	99.7%	(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
	34.6%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) th (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))))
▶	33.0%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
	34.6%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (.f64 th (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
	69.4%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th #s(approx ( th (* (+ (* a2 a2) (* a1 a1)) -1/2)) (.f64 a1 (.f64 a1 (*.f64 th #s(literal -1/2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))
	70.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
▶	70.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
	70.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
	67.7%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
	16.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
	70.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
	70.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	70.7%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
	16.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
	16.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
	70.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
▶	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
	70.5%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
✓	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
	38.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
	43.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))

Compiler

Compiled 1 214 to 723 computations (40.4% saved)

simplify188.0ms (1.6%)

Memory

-11.6MiB live, 383.8MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(sqrt.f64 #s(literal 2 binary64))
cost-diff	0	(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
cost-diff	0	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
cost-diff	1344	(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
cost-diff	0	(+.f64 a2 a1)
cost-diff	0	(.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))
cost-diff	0	#s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2))))
cost-diff	0	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff	0	(*.f64 a1 a1)
cost-diff	0	(fma.f64 a2 a2 (*.f64 a1 a1))
cost-diff	0	(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff	0	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff	0	(.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
cost-diff	0	(.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
cost-diff	0	#s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
cost-diff	0	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
cost-diff	0	(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
cost-diff	0	(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))
cost-diff	0	(cos.f64 th)
cost-diff	0	(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))

Rules

7 836×	`lower-fma.f32`
7 830×	`lower-fma.f64`
4 270×	`lower-*.f32`
4 240×	`lower-*.f64`
2 800×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	58	461
0	89	446
1	164	444
2	406	430
3	1634	430
4	4622	430
5	5607	430
0	8220	428

Stop Event

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

Calls

Call 1

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

Outputs
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(cos.f64 th)
th
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
#s(literal 1/2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))))
#s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1))))
(.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
a1
(.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal 1/2 binary64)
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 a1 a2) (+.f64 a1 a2))))
#s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2))))
#s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (-.f64 a1 a2) (+.f64 a1 a2))))
(.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (-.f64 a1 a2) (+.f64 a1 a2)))
(+.f64 a2 a1)
(+.f64 a1 a2)
a2
a1
(.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (-.f64 a1 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.f64 a1 a1)
(-.f64 a1 a2)
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))
(*.f64 (+.f64 a1 a2) (-.f64 a1 a2))
(*.f64 (-.f64 a1 a2) (+.f64 a1 a2))
(+.f64 a1 a2)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (fma.f64 th (.f64 th (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (fma.f64 th (.f64 th (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))
(.f64 th (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
#s(literal -1/2 binary64)
(*.f64 th th)
th
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
#s(literal 1/2 binary64)

localize143.0ms (1.2%)

Memory

4.3MiB live, 366.3MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	1.0	(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
accuracy	14.878805105680105	(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
accuracy	16.715281585704723	(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))
accuracy	20.217564695627214	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
accuracy	0.0859375	(.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))
accuracy	0.20998002930532605	(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
accuracy	15.36523699444784	#s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2))))
accuracy	42.1321729750172	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0	(*.f64 a1 a1)
accuracy	0	(sqrt.f64 #s(literal 2 binary64))
accuracy	0.20216752930532603	(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
accuracy	18.512528610816325	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0.10546875	(.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
accuracy	0.484375	(.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
accuracy	18.512528610816325	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
accuracy	53.787117940124965	#s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
accuracy	0	(cos.f64 th)
accuracy	0.00390625	(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy	0.0546875	(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
accuracy	0.21779252930532605	(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))

Samples

89.0ms

256×

valid

Compiler

Compiled 381 to 48 computations (87.4% saved)

Precisions

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

ival-mult: 32.0ms (54% of total)

ival-div: 11.0ms (18.6% of total)

ival-add: 8.0ms (13.5% of total)

ival-cos: 6.0ms (10.1% of total)

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

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

exact: 1.0ms (1.7% of total)

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

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

series39.0ms (0.3%)

Memory

19.2MiB live, 97.4MiB allocated

Counts

24 → 576

Calls

Call 1

Inputs
#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())
#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())
#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())
#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())
#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())
#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())
#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())
#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(literal 2 binary64)) (patch (sqrt.f64 #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())

Outputs
#s(alt (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor -inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (/ (+ ( (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (.f64 a1 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (.f64 a1 a1) (patch (.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 4) (cos th))) (taylor 0 a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 4) (cos th))) (* a1 (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))))) (taylor 0 a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3)))))) (taylor 0 a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (+ (* a1 (* (cos th) (+ a2 (* -1 a2)))) (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3)))))) (taylor 0 a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (cos th)) (taylor inf a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1))) (taylor inf a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2))))) (taylor inf a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (+ (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2)) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) (pow a1 3)))))) (taylor inf a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (cos th)) (taylor -inf a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1))) (taylor -inf a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) a1)) a1)))) (taylor -inf a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (* -1 (/ (+ (* -1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) a1)) a1))) a1)))) (taylor -inf a1) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (cos th)) (taylor 0 a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3)))) (* (pow a1 4) (cos th))) (taylor 0 a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* a2 (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th))) (taylor 0 a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* a2 (+ (* a2 (* (cos th) (+ a1 (* -1 a1)))) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th))) (taylor 0 a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 4) (cos th))) (taylor inf a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (/ (* (cos th) (+ a1 (* -1 a1))) a2))) (taylor inf a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (+ (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2)) (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a2 3)))))) (taylor inf a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 4) (cos th))) (taylor -inf a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (* (cos th) (+ a1 (* -1 a1))) a2)))) (taylor -inf a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2)))) (taylor -inf a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) a2)) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2)))) (taylor -inf a2) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (taylor 0 th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor 0 th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* 1/24 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))))))) (taylor 0 th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* 1/24 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))))))) (taylor 0 th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor inf th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor inf th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor inf th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor inf th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor -inf th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor -inf th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor -inf th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (taylor -inf th) (#s(alt #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (patch #s(approx ( (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))) #<representation binary64>) () ())) ())
#s(alt (pow a1 4) (taylor 0 a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a1 4)) (taylor 0 a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a1 3)))) (pow a1 4)) (taylor 0 a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (+ (* a2 (+ a1 (* -1 a1))) (pow a1 2)))) (pow a1 3)))) (pow a1 4)) (taylor 0 a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a2 4)) (taylor inf a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1)) (taylor inf a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 2) (pow a2 2))))) 1)) (taylor inf a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 3) (pow a2 3))) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow a1 3) (pow a2 3))))))) 1)) (taylor inf a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a2 4)) (taylor -inf a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1)) (taylor -inf a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) a2)))) a2)) 1)) (taylor -inf a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) a2)) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)))) a2)) 1)) (taylor -inf a2) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a2 4)) (taylor 0 a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (pow a2 3)))) (taylor 0 a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a2 3))))) (taylor 0 a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (+ (* a1 (+ a2 (* -1 a2))) (pow a2 2)))) (pow a2 3))))) (taylor 0 a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (pow a1 4) (taylor inf a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1)))) (taylor inf a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (/ a2 a1) (/ (pow a2 2) (pow a1 2))))))) (taylor inf a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow a2 3) (pow a1 3))) (+ (/ a2 a1) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 3) (pow a1 3))))))))) (taylor inf a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (pow a1 4) (taylor -inf a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1)))) (taylor -inf a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (+ (* -1 (/ (pow a2 2) a1)) (/ (pow a2 2) a1))) a1)))) (taylor -inf a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (* -1 (/ (+ (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (* -1 (/ (pow a2 3) a1)) (/ (pow a2 3) a1))) a1))) a1)))) (taylor -inf a1) (#s(alt (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) (patch (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))) #<representation binary64>) () ())) ())
#s(alt a1 (taylor 0 a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (+ a1 a2) (taylor 0 a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (+ a1 a2) (taylor 0 a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (+ a1 a2) (taylor 0 a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt a2 (taylor inf a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* a2 (+ 1 (/ a1 a2))) (taylor inf a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* a2 (+ 1 (/ a1 a2))) (taylor inf a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* a2 (+ 1 (/ a1 a2))) (taylor inf a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt a2 (taylor -inf a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a2 (- (* -1 (/ a1 a2)) 1))) (taylor -inf a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a2 (- (* -1 (/ a1 a2)) 1))) (taylor -inf a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a2 (- (* -1 (/ a1 a2)) 1))) (taylor -inf a2) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt a2 (taylor 0 a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (+ a1 a2) (taylor 0 a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (+ a1 a2) (taylor 0 a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (+ a1 a2) (taylor 0 a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt a1 (taylor inf a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ 1 (/ a2 a1))) (taylor inf a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ 1 (/ a2 a1))) (taylor inf a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ 1 (/ a2 a1))) (taylor inf a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt a1 (taylor -inf a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (- (* -1 (/ a2 a1)) 1))) (taylor -inf a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (- (* -1 (/ a2 a1)) 1))) (taylor -inf a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (- (* -1 (/ a2 a1)) 1))) (taylor -inf a1) (#s(alt (+.f64 a2 a1) (patch (+.f64 a2 a1) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))))) (taylor 0 a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))))) (taylor 0 a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))))) (taylor 0 a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))) (taylor inf a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))) (taylor inf a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))) (taylor inf a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))) (taylor inf a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))) (taylor -inf a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))) (taylor -inf a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))) (taylor -inf a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))) (taylor -inf a1) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/2 (* (pow a1 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))))) (taylor 0 a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))))) (taylor 0 a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))))) (taylor 0 a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))) (taylor inf a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))) (taylor inf a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))) (taylor inf a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))) (taylor inf a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))) (taylor -inf a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))) (taylor -inf a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))) (taylor -inf a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))) (taylor -inf a2) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (taylor inf th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor inf th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor inf th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor inf th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (taylor -inf th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor -inf th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor -inf th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor -inf th) (#s(alt (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) (patch (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a1 a1 (.f64 a2 a2)) (patch (fma.f64 a1 a1 (.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (* (sqrt 2) (+ a2 (* -1 a2))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2)))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2)))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (* (sqrt 2) (+ a1 (* -1 a1)))) (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 2) (sqrt 2))) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2))) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 2) (sqrt 2))) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 3) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) a2)) (pow a1 3)) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (pow a1 2)) (* a1 a2))) (pow a1 3)) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (* a2 (+ (* -1 (pow a1 2)) (* a2 (+ a1 (* -1 a2))))) (pow a1 3)) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a2 3)) (taylor inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 3) (- (/ a1 a2) 1)) (taylor inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 3) (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2)) 1)) (taylor inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 3) (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 3) (pow a2 3)))) 1)) (taylor inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a2 3)) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 3) (+ 1 (* -1 (/ a1 a2))))) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 3) (+ 1 (* -1 (/ (+ a1 (* -1 (/ (pow a1 2) a2))) a2))))) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 3) (+ 1 (* -1 (/ (+ a1 (* -1 (/ (+ (* -1 (/ (pow a1 3) a2)) (pow a1 2)) a2))) a2))))) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a2 3)) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a2 3)) (* a1 (pow a2 2))) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a2 3)) (* a1 (+ (* -1 (* a1 a2)) (pow a2 2)))) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a2 3)) (* a1 (+ (* a1 (+ a1 (* -1 a2))) (pow a2 2)))) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 3) (taylor inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 3) (+ 1 (* -1 (/ a2 a1)))) (taylor inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 3) (+ 1 (+ (* -1 (/ a2 a1)) (/ (pow a2 2) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 3) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 3) (pow a1 3))) (/ (pow a2 2) (pow a1 2)))))) (taylor inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (pow a1 3) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 3) (- (/ a2 a1) 1))) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 3) (- (* -1 (/ (+ (* -1 a2) (/ (pow a2 2) a1)) a1)) 1))) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 3) (- (* -1 (/ (+ (* -1 a2) (* -1 (/ (+ (* -1 (pow a2 2)) (/ (pow a2 3) a1)) a1))) a1)) 1))) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a2 2) (pow th 2))) (taylor 0 a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a1 2) (pow th 2))) (taylor inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a1 2) (pow th 2))) (taylor -inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a1 2) (pow th 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2)))) (taylor 0 a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a2 2) (pow th 2))) (taylor inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow a2 2) (pow th 2))) (taylor -inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (patch (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) #<representation binary64>) () ())) ())

Calls

144 calls:

Time	Variable		Point	Expression
1.0ms	th	@	inf	(* (cos th) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2))
1.0ms	th	@	0	(* (cos th) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2))
1.0ms	a1	@	inf	(* (cos th) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2))
1.0ms	a1	@	0	(* (cos th) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2))
1.0ms	a2	@	inf	(* (cos th) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2))

simplify244.0ms (2.1%)

Memory

3.2MiB live, 524.3MiB allocated

Algorithm

1×	egg-herbie

Rules

11 242×	`lower-fma.f64`
11 242×	`lower-fma.f32`
5 340×	`lower-*.f64`
5 340×	`lower-*.f32`
2 916×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	585	9083
1	2032	8321
2	7695	8282
0	8061	7795

Stop Event

1×	iter limit
1×	node limit

Counts

576 → 570

Calls

Call 1

Inputs
(* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(* 1/2 (* (pow a2 2) (sqrt 2)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (sqrt 2))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(* (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (sqrt 2))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(* 1/2 (* a1 (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(* -1 (* (pow a2 4) (cos th)))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3)))))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))))))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (+ (* a1 (* (cos th) (+ a2 (* -1 a2)))) (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))))))
(* (pow a1 4) (cos th))
(* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1)))
(* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2)))))
(* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (+ (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2)) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) (pow a1 3))))))
(* (pow a1 4) (cos th))
(* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1)))
(* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) a1)) a1))))
(* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (* -1 (/ (+ (* -1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) a1)) a1))) a1))))
(* (pow a1 4) (cos th))
(+ (* a2 (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3)))) (* (pow a1 4) (cos th)))
(+ (* a2 (+ (* a2 (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th)))
(+ (* a2 (+ (* a2 (+ (* a2 (* (cos th) (+ a1 (* -1 a1)))) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th)))
(* -1 (* (pow a2 4) (cos th)))
(* (pow a2 4) (+ (* -1 (cos th)) (/ (* (cos th) (+ a1 (* -1 a1))) a2)))
(* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2)))))
(* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (+ (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2)) (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a2 3))))))
(* -1 (* (pow a2 4) (cos th)))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (* (cos th) (+ a1 (* -1 a1))) a2))))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2))))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) a2)) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2))))
(* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))
(+ (* -1/2 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* 1/24 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))))))
(+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* 1/24 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))))))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(pow a1 4)
(+ (* a2 (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a1 4))
(+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a1 3)))) (pow a1 4))
(+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (+ (* a2 (+ a1 (* -1 a1))) (pow a1 2)))) (pow a1 3)))) (pow a1 4))
(* -1 (pow a2 4))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 2) (pow a2 2))))) 1))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 3) (pow a2 3))) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow a1 3) (pow a2 3))))))) 1))
(* -1 (pow a2 4))
(* (pow a2 4) (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1))
(* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) a2)))) a2)) 1))
(* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) a2)) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)))) a2)) 1))
(* -1 (pow a2 4))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (pow a2 3))))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a2 3)))))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (+ (* a1 (+ a2 (* -1 a2))) (pow a2 2)))) (pow a2 3)))))
(pow a1 4)
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1))))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (/ a2 a1) (/ (pow a2 2) (pow a1 2)))))))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow a2 3) (pow a1 3))) (+ (/ a2 a1) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 3) (pow a1 3)))))))))
(pow a1 4)
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1))))
(* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (+ (* -1 (/ (pow a2 2) a1)) (/ (pow a2 2) a1))) a1))))
(* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (* -1 (/ (+ (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (* -1 (/ (pow a2 3) a1)) (/ (pow a2 3) a1))) a1))) a1))))
a1
(+ a1 a2)
(+ a1 a2)
(+ a1 a2)
a2
(* a2 (+ 1 (/ a1 a2)))
(* a2 (+ 1 (/ a1 a2)))
(* a2 (+ 1 (/ a1 a2)))
a2
(* -1 (* a2 (- (* -1 (/ a1 a2)) 1)))
(* -1 (* a2 (- (* -1 (/ a1 a2)) 1)))
(* -1 (* a2 (- (* -1 (/ a1 a2)) 1)))
a2
(+ a1 a2)
(+ a1 a2)
(+ a1 a2)
a1
(* a1 (+ 1 (/ a2 a1)))
(* a1 (+ 1 (/ a2 a1)))
(* a1 (+ 1 (/ a2 a1)))
a1
(* -1 (* a1 (- (* -1 (/ a2 a1)) 1)))
(* -1 (* a1 (- (* -1 (/ a2 a1)) 1)))
(* -1 (* a1 (- (* -1 (/ a2 a1)) 1)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/2 (* (pow a1 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* -1 (* (pow a2 2) (sqrt 2)))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (* (sqrt 2) (+ a2 (* -1 a2)))))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2))))))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2))))))
(* (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))
(* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))))
(* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))))
(* (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))
(* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1))))
(* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1))))
(* (pow a1 2) (sqrt 2))
(+ (* a2 (* (sqrt 2) (+ a1 (* -1 a1)))) (* (pow a1 2) (sqrt 2)))
(+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2)))
(+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* -1 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2))))
(pow a1 3)
(+ (* -1 (* (pow a1 2) a2)) (pow a1 3))
(+ (* a2 (+ (* -1 (pow a1 2)) (* a1 a2))) (pow a1 3))
(+ (* a2 (+ (* -1 (pow a1 2)) (* a2 (+ a1 (* -1 a2))))) (pow a1 3))
(* -1 (pow a2 3))
(* (pow a2 3) (- (/ a1 a2) 1))
(* (pow a2 3) (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2)) 1))
(* (pow a2 3) (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 3) (pow a2 3)))) 1))
(* -1 (pow a2 3))
(* -1 (* (pow a2 3) (+ 1 (* -1 (/ a1 a2)))))
(* -1 (* (pow a2 3) (+ 1 (* -1 (/ (+ a1 (* -1 (/ (pow a1 2) a2))) a2)))))
(* -1 (* (pow a2 3) (+ 1 (* -1 (/ (+ a1 (* -1 (/ (+ (* -1 (/ (pow a1 3) a2)) (pow a1 2)) a2))) a2)))))
(* -1 (pow a2 3))
(+ (* -1 (pow a2 3)) (* a1 (pow a2 2)))
(+ (* -1 (pow a2 3)) (* a1 (+ (* -1 (* a1 a2)) (pow a2 2))))
(+ (* -1 (pow a2 3)) (* a1 (+ (* a1 (+ a1 (* -1 a2))) (pow a2 2))))
(pow a1 3)
(* (pow a1 3) (+ 1 (* -1 (/ a2 a1))))
(* (pow a1 3) (+ 1 (+ (* -1 (/ a2 a1)) (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 3) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 3) (pow a1 3))) (/ (pow a2 2) (pow a1 2))))))
(pow a1 3)
(* -1 (* (pow a1 3) (- (/ a2 a1) 1)))
(* -1 (* (pow a1 3) (- (* -1 (/ (+ (* -1 a2) (/ (pow a2 2) a1)) a1)) 1)))
(* -1 (* (pow a1 3) (- (* -1 (/ (+ (* -1 a2) (* -1 (/ (+ (* -1 (pow a2 2)) (/ (pow a2 3) a1)) a1))) a1)) 1)))
(* -1/2 (* (pow a2 2) (pow th 2)))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(* -1/2 (* (pow a1 2) (pow th 2)))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(* -1/2 (* (pow a1 2) (pow th 2)))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(* -1/2 (* (pow a1 2) (pow th 2)))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(* -1/2 (* (pow a2 2) (pow th 2)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* -1/2 (* (pow a2 2) (pow th 2)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))

Outputs
(* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 #s(literal -1/4 binary64) (.f64 th th) #s(literal 1/2 binary64)))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))
(fma.f64 (.f64 th th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 (.f64 th th) #s(literal 1/48 binary64) #s(literal -1/4 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))
(fma.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 #s(literal -1/4 binary64) (.f64 th th) #s(literal 1/2 binary64)) (.f64 (.f64 th th) (.f64 (.f64 th th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (fma.f64 (*.f64 th th) #s(literal -1/1440 binary64) #s(literal 1/48 binary64))))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 a2 a2))) (cos.f64 th))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (.f64 (.f64 a2 a2) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (.f64 (.f64 a2 a2) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (.f64 (.f64 a2 a2) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (.f64 (.f64 a2 a2) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (.f64 (.f64 a2 a2) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (.f64 (.f64 a2 a2) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 a2 a2))) (cos.f64 th))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a2 a2)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a2 a2)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a2 a2)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 a2 a2))) (cos.f64 th))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a2 a2)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a2 a2)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a2 a2)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (.f64 th th) (fma.f64 th (.f64 th (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(* 1/2 (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (pow a1 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(* (pow a2 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 #s(literal -1/2 binary64) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 #s(literal 1/24 binary64) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (.f64 th th) #s(literal -1/720 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* a1 (sqrt 2)))
(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th th)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (.f64 (.f64 th th) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th th)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (.f64 (.f64 th th) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* (pow a2 4) (cos th)))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3)))))
(-.f64 (.f64 (cos.f64 th) #s(literal 0 binary64)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64))))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))))))
(-.f64 (.f64 (cos.f64 th) #s(literal 0 binary64)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64))))
(+ (* -1 (* (pow a2 4) (cos th))) (* a1 (+ (* a1 (+ (* a1 (* (cos th) (+ a2 (* -1 a2)))) (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))))) (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))))))
(-.f64 (.f64 (cos.f64 th) #s(literal 0 binary64)) (.f64 (cos.f64 th) (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a1 4) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))
(* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1)))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (+ (cos th) (+ (/ (* (cos th) (+ a2 (* -1 a2))) a1) (+ (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a1 2)) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) (pow a1 3))))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))
(* (pow a1 4) (+ (cos th) (/ (* (cos th) (+ a2 (* -1 a2))) a1)))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (/ (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2))) a1)) a1))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (+ (cos th) (* -1 (/ (+ (* -1 (* (cos th) (+ a2 (* -1 a2)))) (* -1 (/ (+ (* -1 (* (cos th) (+ (* -1 (pow a2 2)) (pow a2 2)))) (/ (* (cos th) (+ (* -1 (pow a2 3)) (pow a2 3))) a1)) a1))) a1))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (cos.f64 th) #s(literal 0 binary64) (cos.f64 th)))
(* (pow a1 4) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)))
(+ (* a2 (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3)))) (* (pow a1 4) (cos th)))
(fma.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (cos.f64 th) #s(literal 0 binary64)))
(+ (* a2 (+ (* a2 (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th)))
(fma.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (cos.f64 th) #s(literal 0 binary64)))
(+ (* a2 (+ (* a2 (+ (* a2 (* (cos th) (+ a1 (* -1 a1)))) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))))) (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))))) (* (pow a1 4) (cos th)))
(fma.f64 (cos.f64 th) (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (cos.f64 th) #s(literal 0 binary64)))
(* -1 (* (pow a2 4) (cos th)))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (/ (* (cos th) (+ a1 (* -1 a1))) a2)))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2)))))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (+ (/ (* (cos th) (+ a1 (* -1 a1))) a2) (+ (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a2 2)) (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a2 3))))))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* -1 (* (pow a2 4) (cos th)))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (* (cos th) (+ a1 (* -1 a1))) a2))))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2))))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (pow a2 4) (+ (* -1 (cos th)) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos th) (+ (* -1 (pow a1 3)) (pow a1 3))) a2)) (* (cos th) (+ (* -1 (pow a1 2)) (pow a1 2)))) a2)) (* (cos th) (+ a1 (* -1 a1)))) a2))))
(*.f64 (cos.f64 th) (neg.f64 (pow.f64 a2 #s(literal 4 binary64))))
(* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))
(.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a1 a2)))
(+ (* -1/2 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a1 a2))))
(+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* 1/24 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))))))
(fma.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (.f64 (.f64 th th) (.f64 (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))))
(+ (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))) (* (pow th 2) (+ (* -1/2 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))) (* 1/24 (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2)))))))))
(fma.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) (.f64 (.f64 (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))) (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (.f64 (.f64 th th) (*.f64 th th))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))))
(* (cos th) (* (+ a1 a2) (* (+ (pow a1 2) (pow a2 2)) (- a1 a2))))
(.f64 (cos.f64 th) (.f64 (-.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (+.f64 a1 a2))))
(pow a1 4)
(pow.f64 a1 #s(literal 4 binary64))
(+ (* a2 (+ (* -1 (pow a1 3)) (pow a1 3))) (pow a1 4))
(+.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 0 binary64))
(+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a1 3)))) (pow a1 4))
(+.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 0 binary64))
(+ (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (+ (* a2 (+ a1 (* -1 a1))) (pow a1 2)))) (pow a1 3)))) (pow a1 4))
(+.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 0 binary64))
(* -1 (pow a2 4))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 2) (pow a2 2))))) 1))
(.f64 (pow.f64 a2 #s(literal 4 binary64)) (-.f64 (+.f64 (/.f64 (-.f64 a1 (/.f64 (.f64 a1 a1) a2)) a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal -1 binary64))) (/.f64 a1 a2)))
(* (pow a2 4) (- (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 3) (pow a2 3))) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow a1 3) (pow a2 3))))))) 1))
(.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (-.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) (fma.f64 (.f64 a1 a1) (/.f64 a1 (.f64 a2 (.f64 a2 a2))) (/.f64 a1 a2))) (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) (/.f64 (.f64 a1 (.f64 a1 a1)) (.f64 a2 (.f64 a2 a2))))) (-.f64 #s(literal -1 binary64) (/.f64 a1 a2))))
(* -1 (pow a2 4))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) a2)))) a2)) 1))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) a2)) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)))) a2)) 1))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(* -1 (pow a2 4))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (pow a2 3))))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a2 3)))))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(+ (* -1 (pow a2 4)) (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (+ (* a1 (+ a2 (* -1 a2))) (pow a2 2)))) (pow a2 3)))))
(neg.f64 (pow.f64 a2 #s(literal 4 binary64)))
(pow a1 4)
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1))))
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (/ a2 a1) (/ (pow a2 2) (pow a1 2)))))))
(.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 (-.f64 (/.f64 a2 a1) (/.f64 (.f64 a2 a2) (.f64 a1 a1))) (/.f64 (-.f64 (/.f64 (.f64 a2 a2) a1) a2) a1))))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow a2 3) (pow a1 3))) (+ (/ a2 a1) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 3) (pow a1 3)))))))))
(.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (-.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) (fma.f64 a2 (/.f64 (.f64 a2 a2) (.f64 a1 (.f64 a1 a1))) (/.f64 a2 a1))) (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) (/.f64 (.f64 a2 (.f64 a2 a2)) (.f64 a1 (.f64 a1 a1))))) (/.f64 a2 a1))))
(pow a1 4)
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (+ (* -1 (/ a2 a1)) (/ a2 a1))))
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (+ (* -1 (/ (pow a2 2) a1)) (/ (pow a2 2) a1))) a1))))
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (* -1 (/ (+ (* -1 (+ a2 (* -1 a2))) (* -1 (/ (+ (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (* -1 (/ (pow a2 3) a1)) (/ (pow a2 3) a1))) a1))) a1))))
(pow.f64 a1 #s(literal 4 binary64))
a1
(+ a1 a2)
(+.f64 a1 a2)
(+ a1 a2)
(+.f64 a1 a2)
(+ a1 a2)
(+.f64 a1 a2)
a2
(* a2 (+ 1 (/ a1 a2)))
(fma.f64 a2 (/.f64 a1 a2) a2)
(* a2 (+ 1 (/ a1 a2)))
(fma.f64 a2 (/.f64 a1 a2) a2)
(* a2 (+ 1 (/ a1 a2)))
(fma.f64 a2 (/.f64 a1 a2) a2)
a2
(* -1 (* a2 (- (* -1 (/ a1 a2)) 1)))
(fma.f64 (neg.f64 a2) (/.f64 a1 (neg.f64 a2)) a2)
(* -1 (* a2 (- (* -1 (/ a1 a2)) 1)))
(fma.f64 (neg.f64 a2) (/.f64 a1 (neg.f64 a2)) a2)
(* -1 (* a2 (- (* -1 (/ a1 a2)) 1)))
(fma.f64 (neg.f64 a2) (/.f64 a1 (neg.f64 a2)) a2)
a2
(+ a1 a2)
(+.f64 a1 a2)
(+ a1 a2)
(+.f64 a1 a2)
(+ a1 a2)
(+.f64 a1 a2)
a1
(* a1 (+ 1 (/ a2 a1)))
(fma.f64 a1 (/.f64 a2 a1) a1)
(* a1 (+ 1 (/ a2 a1)))
(fma.f64 a1 (/.f64 a2 a1) a1)
(* a1 (+ 1 (/ a2 a1)))
(fma.f64 a1 (/.f64 a2 a1) a1)
a1
(* -1 (* a1 (- (* -1 (/ a2 a1)) 1)))
(neg.f64 (*.f64 a1 (-.f64 #s(literal -1 binary64) (/.f64 a2 a1))))
(* -1 (* a1 (- (* -1 (/ a2 a1)) 1)))
(neg.f64 (*.f64 a1 (-.f64 #s(literal -1 binary64) (/.f64 a2 a1))))
(* -1 (* a1 (- (* -1 (/ a2 a1)) 1)))
(neg.f64 (*.f64 a1 (-.f64 #s(literal -1 binary64) (/.f64 a2 a1))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(fma.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(fma.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(fma.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))
(.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 (.f64 th th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 (.f64 th th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 (.f64 th th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))
(.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 (.f64 th th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 (.f64 th th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
(.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 a2 a2) (/.f64 (.f64 th th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/2 (* (pow a1 2) (sqrt 2))))
(.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(fma.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(fma.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))))
(fma.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))
(.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(.f64 a2 (.f64 a2 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 th th) (/.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(.f64 a2 (.f64 a2 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 th th) (/.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(.f64 a2 (.f64 a2 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 th th) (/.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2))))
(.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(.f64 a2 (.f64 a2 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 th th) (/.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(.f64 a2 (.f64 a2 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 th th) (/.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
(.f64 a2 (.f64 a2 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 a1 a1) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (fma.f64 (.f64 th th) (/.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64))))))))
(* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(.f64 (.f64 th th) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 th th)) (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(.f64 (.f64 th th) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 th th)) (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(.f64 (.f64 th th) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 th th)) (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(.f64 (.f64 th th) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 th th)) (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(.f64 (.f64 th th) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 th th)) (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(.f64 (.f64 th th) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 th th)) (/.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a1 (.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(.f64 (.f64 a2 a2) (.f64 (fma.f64 a1 (/.f64 a1 (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th th)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (.f64 th th) (fma.f64 (.f64 th th) (fma.f64 (.f64 (.f64 th th) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(.f64 (.f64 a2 a2) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* -1 (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (neg.f64 a2)))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (* (sqrt 2) (+ a2 (* -1 a2)))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (neg.f64 a2)))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2))))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (neg.f64 a2))))
(+ (* -1 (* (pow a2 2) (sqrt 2))) (* a1 (+ (* a1 (sqrt 2)) (* (sqrt 2) (+ a2 (* -1 a2))))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (neg.f64 a2))))
(* (pow a1 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))
(* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))
(.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 a1 #s(literal 0 binary64))))
(* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))))
(fma.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))
(* (pow a1 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))))
(fma.f64 (.f64 a1 a1) (fma.f64 (.f64 a2 (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))
(* (pow a1 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))
(* (pow a1 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))
(.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 a1 #s(literal 0 binary64))))
(* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1))))
(.f64 (.f64 a1 a1) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))))
(* (pow a1 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a2 (* -1 a2)))) (/ (* (pow a2 2) (sqrt 2)) a1)) a1))))
(.f64 (.f64 a1 a1) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))))
(* (pow a1 2) (sqrt 2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))
(+ (* a2 (* (sqrt 2) (+ a1 (* -1 a1)))) (* (pow a1 2) (sqrt 2)))
(.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 a1 #s(literal 0 binary64))))
(+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2)))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (neg.f64 a2))))
(+ (* a2 (+ (* -1 (* a2 (sqrt 2))) (* (sqrt 2) (+ a1 (* -1 a1))))) (* (pow a1 2) (sqrt 2)))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (neg.f64 a2))))
(* -1 (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (neg.f64 a2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (neg.f64 a2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 (.f64 a2 a2) (-.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(.f64 (.f64 a2 a2) (-.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* (pow a2 2) (sqrt 2)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (neg.f64 a2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (neg.f64 a2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2))))
(.f64 (.f64 a2 a2) (-.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 a2 a2)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) a2)) (* (sqrt 2) (+ a1 (* -1 a1)))) a2))))
(.f64 (.f64 a2 a2) (-.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 a2 a2)))))
(pow a1 3)
(.f64 a1 (.f64 a1 a1))
(+ (* -1 (* (pow a1 2) a2)) (pow a1 3))
(.f64 a1 (.f64 a1 (-.f64 a1 a2)))
(+ (* a2 (+ (* -1 (pow a1 2)) (* a1 a2))) (pow a1 3))
(.f64 a1 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)))
(+ (* a2 (+ (* -1 (pow a1 2)) (* a2 (+ a1 (* -1 a2))))) (pow a1 3))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (-.f64 a1 a2))
(* -1 (pow a2 3))
(.f64 a2 (.f64 a2 (neg.f64 a2)))
(* (pow a2 3) (- (/ a1 a2) 1))
(.f64 (.f64 a2 a2) (*.f64 a2 (+.f64 #s(literal -1 binary64) (/.f64 a1 a2))))
(* (pow a2 3) (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2)) 1))
(.f64 (.f64 a2 (.f64 a2 a2)) (+.f64 #s(literal -1 binary64) (/.f64 (-.f64 a1 (/.f64 (.f64 a1 a1) a2)) a2)))
(* (pow a2 3) (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 3) (pow a2 3)))) 1))
(.f64 (.f64 a2 (.f64 a2 a2)) (+.f64 (/.f64 (-.f64 a1 (/.f64 (.f64 a1 a1) a2)) a2) (fma.f64 (.f64 a1 a1) (/.f64 a1 (.f64 a2 (*.f64 a2 a2))) #s(literal -1 binary64))))
(* -1 (pow a2 3))
(.f64 a2 (.f64 a2 (neg.f64 a2)))
(* -1 (* (pow a2 3) (+ 1 (* -1 (/ a1 a2)))))
(.f64 (.f64 a2 (*.f64 a2 (neg.f64 a2))) (-.f64 #s(literal 1 binary64) (/.f64 a1 a2)))
(* -1 (* (pow a2 3) (+ 1 (* -1 (/ (+ a1 (* -1 (/ (pow a1 2) a2))) a2)))))
(.f64 (.f64 a2 (.f64 a2 (neg.f64 a2))) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 a1 (/.f64 (.f64 a1 a1) a2)) a2)))
(* -1 (* (pow a2 3) (+ 1 (* -1 (/ (+ a1 (* -1 (/ (+ (* -1 (/ (pow a1 3) a2)) (pow a1 2)) a2))) a2)))))
(neg.f64 (.f64 (.f64 a2 (.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 a1 (/.f64 (-.f64 (.f64 a1 a1) (/.f64 (.f64 a1 (.f64 a1 a1)) a2)) a2)) a2))))
(* -1 (pow a2 3))
(.f64 a2 (.f64 a2 (neg.f64 a2)))
(+ (* -1 (pow a2 3)) (* a1 (pow a2 2)))
(.f64 a2 (.f64 a2 (-.f64 a1 a2)))
(+ (* -1 (pow a2 3)) (* a1 (+ (* -1 (* a1 a2)) (pow a2 2))))
(.f64 a2 (fma.f64 a2 (-.f64 a1 a2) (.f64 a1 (neg.f64 a1))))
(+ (* -1 (pow a2 3)) (* a1 (+ (* a1 (+ a1 (* -1 a2))) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (-.f64 a1 a2))
(pow a1 3)
(.f64 a1 (.f64 a1 a1))
(* (pow a1 3) (+ 1 (* -1 (/ a2 a1))))
(.f64 (.f64 a1 a1) (*.f64 a1 (-.f64 #s(literal 1 binary64) (/.f64 a2 a1))))
(* (pow a1 3) (+ 1 (+ (* -1 (/ a2 a1)) (/ (pow a2 2) (pow a1 2)))))
(.f64 a1 (.f64 (.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 a2 a2) a1) a2) a1))))
(* (pow a1 3) (+ 1 (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 3) (pow a1 3))) (/ (pow a2 2) (pow a1 2))))))
(.f64 a1 (.f64 (.f64 a1 a1) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (-.f64 (/.f64 (.f64 a2 a2) a1) a2) a1) (/.f64 (.f64 a2 (.f64 a2 a2)) (.f64 a1 (.f64 a1 a1)))))))
(pow a1 3)
(.f64 a1 (.f64 a1 a1))
(* -1 (* (pow a1 3) (- (/ a2 a1) 1)))
(.f64 (.f64 a1 (*.f64 a1 (neg.f64 a1))) (+.f64 #s(literal -1 binary64) (/.f64 a2 a1)))
(* -1 (* (pow a1 3) (- (* -1 (/ (+ (* -1 a2) (/ (pow a2 2) a1)) a1)) 1)))
(.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (+.f64 #s(literal -1 binary64) (/.f64 (-.f64 a2 (/.f64 (.f64 a2 a2) a1)) a1)))
(* -1 (* (pow a1 3) (- (* -1 (/ (+ (* -1 a2) (* -1 (/ (+ (* -1 (pow a2 2)) (/ (pow a2 3) a1)) a1))) a1)) 1)))
(.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (-.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (fma.f64 a2 a2 (/.f64 (.f64 a2 (*.f64 a2 (neg.f64 a2))) a1)) a1) a2) a1)))
(* -1/2 (* (pow a2 2) (pow th 2)))
(.f64 (.f64 a2 a2) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow a1 2) (pow th 2)))
(.f64 (.f64 a1 a1) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a1 a1) #s(literal -1/2 binary64)) (fma.f64 (.f64 th th) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (*.f64 th th)))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a1 a1) #s(literal -1/2 binary64)) (fma.f64 (.f64 th th) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (*.f64 th th)))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a1 a1) #s(literal -1/2 binary64)) (fma.f64 (.f64 th th) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (*.f64 th th)))
(* -1/2 (* (pow a1 2) (pow th 2)))
(.f64 (.f64 a1 a1) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a1 a1) #s(literal -1/2 binary64)) (fma.f64 (.f64 th th) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (*.f64 th th)))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a1 a1) #s(literal -1/2 binary64)) (fma.f64 (.f64 th th) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (*.f64 th th)))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a1 a1) #s(literal -1/2 binary64)) (fma.f64 (.f64 th th) (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (*.f64 th th)))
(* -1/2 (* (pow a1 2) (pow th 2)))
(.f64 (.f64 a1 a1) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (* -1/2 (* (pow a2 2) (pow th 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow a2 2) (pow th 2)))
(.f64 (.f64 a2 a2) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 th th) (.f64 a2 a2)) (*.f64 th th)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 th th) (.f64 a2 a2)) (*.f64 th th)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 th th) (.f64 a2 a2)) (*.f64 th th)))
(* -1/2 (* (pow a2 2) (pow th 2)))
(.f64 (.f64 a2 a2) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 th th) (.f64 a2 a2)) (*.f64 th th)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 th th) (.f64 a2 a2)) (*.f64 th th)))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (* -1/2 (pow th 2))))
(.f64 (.f64 (.f64 a2 a2) #s(literal -1/2 binary64)) (fma.f64 (.f64 a1 a1) (/.f64 (.f64 th th) (.f64 a2 a2)) (*.f64 th th)))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))
(* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2))))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 th (.f64 th #s(literal -1/2 binary64))))

rewrite272.0ms (2.3%)

Memory

-26.2MiB live, 494.0MiB allocated

Rules

4 712×	`lower-/.f32`
4 706×	`lower-/.f64`
4 452×	`lower-*.f32`
4 422×	`lower-*.f64`
3 020×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	58	363
0	89	348
1	293	310
2	2539	310
0	8305	308

Stop Event

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

Counts

24 → 751

Calls

Call 1

Inputs
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(cos.f64 th)
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2))))
(.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 a1 a2)))
(+.f64 a2 a1)
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(fma.f64 a1 a1 (*.f64 a2 a2))
(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2))
(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th))

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

eval219.0ms (1.9%)

Memory: 13.9MiB live, 472.1MiB allocated
Compiler: Compiled 60 635 to 3 099 computations (94.9% saved)

prune349.0ms (3%)

Memory

-1.7MiB live, 806.6MiB allocated

Pruning

46 alts after pruning (42 fresh and 4 done)

	Pruned	Kept	Total
New	1 733	23	1 756
Fresh	6	19	25
Picked	3	2	5
Done	0	2	2
Total	1 742	46	1 788

Accuracy

100.0%

Counts

1 788 → 46

Alt Table

Click to see full alt table

Status	Accuracy	Program
	65.8%	(/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (sqrt 2) (cos th)) (.f64 (fma.f64 (*.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
	58.5%	(/.f64 (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
✓	99.7%	(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
	99.1%	(/.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
	17.1%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)) (fma.f64 a1 (.f64 a1 a1) (.f64 a2 (.f64 a2 a2))))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	10.4%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (+.f64 a1 a2))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	16.2%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) (-.f64 a1 a2)))
	17.1%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (-.f64 a1 a2) (*.f64 (+.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
	9.1%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) #s(approx ( (* (+ a1 a2) (- a1 a2)) (sqrt 2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
	4.7%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (-.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (fma.f64 a2 a2 (/.f64 (.f64 a2 (.f64 a2 (neg.f64 a2))) a1)) a1) a2) a1)))))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	1.1%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (+.f64 #s(literal -1 binary64) (/.f64 (-.f64 a2 (/.f64 (.f64 a2 a2) a1)) a1)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	16.7%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a2 (.f64 a2 (neg.f64 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	1.5%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	1.1%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 (.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 a2 a2) a1) a2) a1))))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	2.0%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 a1 a1))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	70.5%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
	99.0%	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
	99.1%	(.f64 (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
	99.6%	(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/2 binary64)) (cos.f64 th)))
	99.1%	(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64)))
	32.6%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64))))
	34.6%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
	69.4%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th #s(approx ( th (* (+ (* a2 a2) (* a1 a1)) -1/2)) (.f64 a1 (.f64 a1 (*.f64 th #s(literal -1/2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))
	70.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
	10.0%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
✓	70.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
	70.5%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
	70.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
	70.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
	67.7%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
	16.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
	67.7%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
	16.9%	#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
	70.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	70.7%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
	16.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
	70.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
	70.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
✓	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
✓	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
	14.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
	38.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
	43.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))

Compiler

Compiled 2 711 to 870 computations (67.9% saved)

regimes188.0ms (1.6%)

Memory

25.6MiB live, 340.7MiB allocated

Counts

84 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (sqrt 2) (cos th)) (.f64 (fma.f64 (*.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 a1 a1))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a2 (.f64 a2 (neg.f64 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) #s(approx ( (* (+ a1 a2) (- a1 a2)) (sqrt 2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (-.f64 a1 a2) (*.f64 (+.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) th (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (.f64 th (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 (.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 a2 a2) a1) a2) a1))))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th #s(approx ( th (* (+ (* a2 a2) (* a1 a1)) -1/2)) (.f64 a1 (.f64 a1 (*.f64 th #s(literal -1/2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (+.f64 #s(literal -1 binary64) (/.f64 (-.f64 a2 (/.f64 (.f64 a2 a2) a1)) a1)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (+.f64 a1 a2))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)) (fma.f64 a1 (.f64 a1 a1) (.f64 a2 (.f64 a2 a2))))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (-.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (fma.f64 a2 a2 (/.f64 (.f64 a2 (.f64 a2 (neg.f64 a2))) a1)) a1) a2) a1)))))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 th th)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
(/.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/2 binary64)) (cos.f64 th)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (cos.f64 th))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))))
(.f64 (neg.f64 (fma.f64 a1 a1 (.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th)) (fma.f64 th (.f64 th (fma.f64 (.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)))))
(.f64 (fma.f64 (cos.f64 th) (.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))) #s(literal 1/2 binary64))
(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))) (*.f64 a2 a2)))

Outputs
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))

Calls

8 calls:

25.0ms	a2
24.0ms	th
23.0ms	(cos.f64 th)
23.0ms	a1
23.0ms	(*.f64 a2 a2)

Results

Accuracy	Segments	Branch
99.7%	1	`a1`
99.7%	1	`a2`
99.7%	1	`th`
99.7%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
99.7%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.7%	1	`(cos.f64 th)`
99.7%	1	`(*.f64 a1 a1)`
99.7%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes155.0ms (1.3%)

Memory

2.5MiB live, 324.8MiB allocated

Counts

71 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (sqrt 2) (cos th)) (.f64 (fma.f64 (*.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 a1 a1))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a2 (.f64 a2 (neg.f64 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) #s(approx ( (* (+ a1 a2) (- a1 a2)) (sqrt 2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (-.f64 a1 a2) (*.f64 (+.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) th (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (.f64 th (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 (.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 a2 a2) a1) a2) a1))))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th #s(approx ( th (* (+ (* a2 a2) (* a1 a1)) -1/2)) (.f64 a1 (.f64 a1 (*.f64 th #s(literal -1/2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (+.f64 #s(literal -1 binary64) (/.f64 (-.f64 a2 (/.f64 (.f64 a2 a2) a1)) a1)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (+.f64 a1 a2))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)) (fma.f64 a1 (.f64 a1 a1) (.f64 a2 (.f64 a2 a2))))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (-.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (fma.f64 a2 a2 (/.f64 (.f64 a2 (.f64 a2 (neg.f64 a2))) a1)) a1) a2) a1)))))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 th th)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
(/.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/2 binary64)) (cos.f64 th)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))

Outputs
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))

Calls

8 calls:

22.0ms	a2
19.0ms	(*.f64 a2 a2)
19.0ms	a1
18.0ms	th
18.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
99.7%	1	`a1`
99.7%	1	`a2`
99.7%	1	`th`
99.7%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
99.7%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.7%	1	`(cos.f64 th)`
99.7%	1	`(*.f64 a1 a1)`
99.7%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes143.0ms (1.2%)

Memory

-7.5MiB live, 269.4MiB allocated

Counts

65 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (sqrt 2) (cos th)) (.f64 (fma.f64 (*.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 a1 a1))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a2 (.f64 a2 (neg.f64 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) #s(approx ( (* (+ a1 a2) (- a1 a2)) (sqrt 2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (-.f64 a1 a2) (*.f64 (+.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) th (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (.f64 th (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 (.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 a2 a2) a1) a2) a1))))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th #s(approx ( th (* (+ (* a2 a2) (* a1 a1)) -1/2)) (.f64 a1 (.f64 a1 (*.f64 th #s(literal -1/2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (+.f64 #s(literal -1 binary64) (/.f64 (-.f64 a2 (/.f64 (.f64 a2 a2) a1)) a1)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (+.f64 a1 a2))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)) (fma.f64 a1 (.f64 a1 a1) (.f64 a2 (.f64 a2 a2))))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (-.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (fma.f64 a2 a2 (/.f64 (.f64 a2 (.f64 a2 (neg.f64 a2))) a1)) a1) a2) a1)))))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 th th)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
(/.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/2 binary64)) (cos.f64 th)))

Outputs
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))

Calls

8 calls:

19.0ms	a2
19.0ms	a1
18.0ms	th
18.0ms	(cos.f64 th)
17.0ms	(*.f64 a2 a2)

Results

Accuracy	Segments	Branch
99.7%	1	`a1`
99.7%	1	`a2`
99.7%	1	`th`
99.7%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
99.7%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.7%	1	`(cos.f64 th)`
99.7%	1	`(*.f64 a1 a1)`
99.7%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes138.0ms (1.2%)

Memory

1.5MiB live, 275.2MiB allocated

Counts

63 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (sqrt 2) (cos th)) (.f64 (fma.f64 (*.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 a1 a1))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a2 (.f64 a2 (neg.f64 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) #s(approx ( (* (+ a1 a2) (- a1 a2)) (sqrt 2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (-.f64 a1 a2) (*.f64 (+.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) th (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (.f64 th (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 (.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 a2 a2) a1) a2) a1))))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th #s(approx ( th (* (+ (* a2 a2) (* a1 a1)) -1/2)) (.f64 a1 (.f64 a1 (*.f64 th #s(literal -1/2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (+.f64 #s(literal -1 binary64) (/.f64 (-.f64 a2 (/.f64 (.f64 a2 a2) a1)) a1)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (+.f64 a1 a2))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)) (fma.f64 a1 (.f64 a1 a1) (.f64 a2 (.f64 a2 a2))))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (-.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (fma.f64 a2 a2 (/.f64 (.f64 a2 (.f64 a2 (neg.f64 a2))) a1)) a1) a2) a1)))))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 th th)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))
(/.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (.f64 a2 (.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (cos.f64 th) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))

Outputs
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))

Calls

8 calls:

18.0ms	a2
18.0ms	a1
17.0ms	th
17.0ms	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
17.0ms	(*.f64 a2 a2)

Results

Accuracy	Segments	Branch
99.1%	1	`a1`
99.1%	1	`a2`
99.1%	1	`th`
99.1%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
99.1%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.1%	1	`(cos.f64 th)`
99.1%	1	`(*.f64 a1 a1)`
99.1%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes132.0ms (1.1%)

Memory

2.8MiB live, 256.9MiB allocated

Counts

58 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (sqrt 2) (cos th)) (.f64 (fma.f64 (*.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 a1 a1))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a2 (.f64 a2 (neg.f64 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) #s(approx ( (* (+ a1 a2) (- a1 a2)) (sqrt 2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (-.f64 a1 a2) (*.f64 (+.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) th (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (.f64 th (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 (.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 a2 a2) a1) a2) a1))))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th #s(approx ( th (* (+ (* a2 a2) (* a1 a1)) -1/2)) (.f64 a1 (.f64 a1 (*.f64 th #s(literal -1/2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (+.f64 #s(literal -1 binary64) (/.f64 (-.f64 a2 (/.f64 (.f64 a2 a2) a1)) a1)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (+.f64 a1 a2))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)) (fma.f64 a1 (.f64 a1 a1) (.f64 a2 (.f64 a2 a2))))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (-.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (fma.f64 a2 a2 (/.f64 (.f64 a2 (.f64 a2 (neg.f64 a2))) a1)) a1) a2) a1)))))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 th th)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))

Outputs
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64)))

Calls

8 calls:

21.0ms	(*.f64 a2 a2)
17.0ms	th
16.0ms	a1
16.0ms	a2
15.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
99.1%	1	`a1`
99.1%	1	`a2`
99.1%	1	`th`
99.1%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
99.1%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.1%	1	`(cos.f64 th)`
99.1%	1	`(*.f64 a1 a1)`
99.1%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes123.0ms (1.1%)

Memory

3.6MiB live, 239.2MiB allocated

Counts

56 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (sqrt 2) (cos th)) (.f64 (fma.f64 (*.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 a1 a1))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a1 a1) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* (/ 1 (sqrt 2)) (* (* (+ (* a1 a1) (* a2 a2)) -1/2) (* th th))) (* (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 1/2)) (.f64 (.f64 a2 a2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (.f64 th (.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a2 (.f64 a2 (neg.f64 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) #s(approx ( (* (+ a1 a2) (- a1 a2)) (sqrt 2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (-.f64 a1 a2) (*.f64 (+.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) th (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 #s(literal -1/2 binary64) th)) (.f64 th (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 th (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64))) th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)) (.f64 th th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) (-.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 a1 (.f64 (.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 a2 a2) a1) a2) a1))))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th #s(approx ( th (* (+ (* a2 a2) (* a1 a1)) -1/2)) (.f64 a1 (.f64 a1 (*.f64 th #s(literal -1/2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (+.f64 #s(literal -1 binary64) (/.f64 (-.f64 a2 (/.f64 (.f64 a2 a2) a1)) a1)))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 th (.f64 th (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (.f64 a2 a2) (.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) (/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (-.f64 a1 a2) (+.f64 a1 a2))) (.f64 (.f64 (-.f64 a1 a2) (+.f64 a1 a2)) (+.f64 a1 a2))))) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 (-.f64 a1 a2) (.f64 a2 a2)) (fma.f64 a1 (.f64 a1 a1) (.f64 a2 (.f64 a2 a2))))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (-.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (+.f64 a2 a1) #s(approx ( (+ (* a2 a2) (* a1 a1)) (- a1 a2)) (.f64 (.f64 a1 (.f64 a1 (neg.f64 a1))) (-.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (fma.f64 a2 a2 (/.f64 (.f64 a2 (.f64 a2 (neg.f64 a2))) a1)) a1) a2) a1)))))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 th th)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 #s(literal 2 binary64) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))))

Outputs

#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))

Calls

8 calls:

16.0ms	a2
15.0ms	th
15.0ms	(cos.f64 th)
15.0ms	(*.f64 a2 a2)
15.0ms	a1

Results

Accuracy	Segments	Branch
73.2%	2	`a1`
70.9%	1	`a2`
72.9%	2	`th`
81.2%	2	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
81.2%	2	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
81.2%	2	`(cos.f64 th)`
73.2%	2	`(*.f64 a1 a1)`
70.9%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes9.0ms (0.1%)

Memory

-27.3MiB live, 13.8MiB allocated

Counts

22 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (sqrt 2) (cos th)) (.f64 (fma.f64 (*.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))

Outputs

#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))

Calls

1 calls:

8.0ms

(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))

Results

Accuracy	Segments	Branch
81.2%	2	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`

Compiler

Compiled 22 to 12 computations (45.5% saved)

regimes7.0ms (0.1%)

Memory

14.6MiB live, 14.6MiB allocated

Counts

21 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (sqrt 2) (cos th)) (.f64 (fma.f64 (*.f64 th th) #s(literal 1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))

Outputs

#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))

(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1)))))

Calls

1 calls:

6.0ms

(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))

Results

Accuracy	Segments	Branch
81.2%	2	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`

Compiler

Compiled 22 to 12 computations (45.5% saved)

regimes6.0ms (0.1%)

Memory

11.4MiB live, 11.4MiB allocated

Counts

17 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))

Outputs

#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))

#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))

Calls

1 calls:

5.0ms

(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))

Results

Accuracy	Segments	Branch
81.2%	2	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`

Compiler

Compiled 22 to 12 computations (45.5% saved)

regimes16.0ms (0.1%)

Memory

-10.0MiB live, 29.1MiB allocated

Counts

15 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))

Outputs

#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))

#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))

Calls

3 calls:

5.0ms

(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))

5.0ms

(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

4.0ms

(cos.f64 th)

Results

Accuracy	Segments	Branch
77.1%	2	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
77.1%	2	`(cos.f64 th)`
77.2%	2	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`

Compiler

Compiled 35 to 23 computations (34.3% saved)

regimes38.0ms (0.3%)

Memory

-7.3MiB live, 71.0MiB allocated

Counts

14 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))

Outputs
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))

Calls

8 calls:

5.0ms	(*.f64 a2 a2)
5.0ms	(cos.f64 th)
5.0ms	a2
5.0ms	a1
5.0ms	th

Results

Accuracy	Segments	Branch
70.9%	1	`a2`
70.9%	1	`(*.f64 a2 a2)`
70.9%	1	`th`
70.9%	1	`(*.f64 a1 a1)`
70.9%	1	`a1`
70.9%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
70.9%	1	`(cos.f64 th)`
70.9%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes34.0ms (0.3%)

Memory

19.1MiB live, 60.0MiB allocated

Counts

11 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))

Outputs
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))

Calls

8 calls:

8.0ms	th
4.0ms	a1
4.0ms	a2
4.0ms	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
4.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
70.9%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
70.9%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
70.9%	1	`(cos.f64 th)`
70.9%	1	`a2`
70.9%	1	`th`
70.9%	1	`(*.f64 a1 a1)`
70.9%	1	`(*.f64 a2 a2)`
70.9%	1	`a1`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes28.0ms (0.2%)

Memory

-26.7MiB live, 51.8MiB allocated

Counts

9 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))

Outputs

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))

Calls

8 calls:

4.0ms	th
4.0ms	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
4.0ms	a1
3.0ms	a2
3.0ms	(*.f64 a2 a2)

Results

Accuracy	Segments	Branch
70.5%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
70.5%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
70.5%	1	`(cos.f64 th)`
70.5%	1	`a2`
70.5%	1	`(*.f64 a1 a1)`
70.5%	1	`(*.f64 a2 a2)`
70.5%	1	`a1`
70.5%	1	`th`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes21.0ms (0.2%)

Memory

1.4MiB live, 40.5MiB allocated

Counts

6 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))

Outputs

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))

Calls

8 calls:

3.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
3.0ms	a1
3.0ms	a2
3.0ms	th
2.0ms	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))

Results

Accuracy	Segments	Branch
70.4%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
70.4%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
70.4%	1	`(cos.f64 th)`
70.4%	1	`a1`
70.4%	1	`a2`
70.4%	1	`th`
70.4%	1	`(*.f64 a1 a1)`
70.4%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes13.0ms (0.1%)

Memory

27.1MiB live, 27.1MiB allocated

Counts

2 → 1

Calls

Call 1

Inputs

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (*.f64 a1 (*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (*.f64 a2 (*.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))

Outputs

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (*.f64 a2 (*.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))

Calls

8 calls:

2.0ms	th
2.0ms	a1
2.0ms	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
2.0ms	a2
1.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
70.4%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
70.4%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
70.4%	1	`(cos.f64 th)`
70.4%	1	`a1`
70.4%	1	`a2`
70.4%	1	`th`
70.4%	1	`(*.f64 a1 a1)`
70.4%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes12.0ms (0.1%)

Memory

-16.3MiB live, 24.1MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (*.f64 a1 (*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))

Outputs

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (*.f64 a1 (*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))

Calls

8 calls:

3.0ms	(*.f64 a2 a2)
1.0ms	a2
1.0ms	th
1.0ms	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
1.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
14.0%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
14.0%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
14.0%	1	`(cos.f64 th)`
14.0%	1	`a2`
14.0%	1	`(*.f64 a1 a1)`
14.0%	1	`(*.f64 a2 a2)`
14.0%	1	`a1`
14.0%	1	`th`

Compiler

Compiled 59 to 40 computations (32.2% saved)

bsearch1.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-1.1966121928686685e-27	-1.3389070671546684e-132

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-1.1966121928686685e-27	-1.3389070671546684e-132

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-1.1966121928686685e-27	-1.3389070671546684e-132

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.4MiB live, 0.4MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-1.1966121928686685e-27	-1.3389070671546684e-132

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.4MiB live, 0.4MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-1.1966121928686685e-27	-1.3389070671546684e-132

Compiler

Compiled 25 to 18 computations (28% saved)

simplify11.0ms (0.1%)

Memory

19.2MiB live, 19.2MiB allocated

Algorithm

1×	egg-herbie

Rules

40×	`*-commutative_binary64`
2×	`+-commutative_binary64`
2×	`1-exp_binary64`
2×	`1-exp_binary32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	105	832
1	129	832

Stop Event

1×

saturated

Calls

Call 1

Inputs
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx ( (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))

Outputs
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
(.f64 (cos.f64 th) (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1/2 binary64)))
(.f64 (cos.f64 th) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx ( (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx ( (cos th) (+ (* a1 a1) (* a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 (+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -348449143727041/348449143727040986586495598010130648530944 binary64)) #s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (+ (* a1 (/ a1 (sqrt 2))) (/ (* th (* th (* (+ (* a2 a2) (* a1 a1)) -1/2))) (sqrt 2)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))) #s(approx (/ (+ ( a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th))) (.f64 (.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a2 (.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a1 a1) (sqrt 2)) (* (sqrt 2) (* a2 a2))) 2) (.f64 a1 (.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))

soundness1.7s (15.1%)

Memory

4.9MiB live, 1 255.5MiB allocated

Rules

34 694×	`lower-fma.f64`
34 694×	`lower-fma.f32`
17 750×	`lower-fma.f64`
17 750×	`lower-fma.f32`
11 242×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	325	10552
1	1101	9848
2	4101	9286
0	8063	8688
0	553	7565
1	1926	6768
2	7536	6750
0	8044	6362
0	12	44
0	20	38
1	58	38
2	411	38
3	7331	38
0	8434	37
0	111	1498
1	343	1366
2	1205	1262
3	3898	1233
0	8422	1172
0	585	9083
1	2032	8321
2	7695	8282
0	8061	7795
0	35	209
0	56	184
1	209	170
2	1772	170
0	8121	170
0	49	340
0	79	325
1	282	305
2	2460	304
0	8141	301

Stop Event

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

Compiler

Compiled 1 276 to 534 computations (58.2% saved)

preprocess119.0ms (1%)

Memory

4.1MiB live, 195.1MiB allocated

Remove

(sort a1 a2)

(abs a1)

(abs a2)

(abs th)

Compiler

Compiled 1 496 to 618 computations (58.7% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze0.0ms (0%)

sample1.4s (12.1%)

explain204.0ms (1.8%)

preprocess137.0ms (1.2%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify6.0ms (0.1%)

localize45.0ms (0.4%)

series26.0ms (0.2%)

simplify545.0ms (4.7%)

rewrite312.0ms (2.7%)

eval108.0ms (0.9%)

prune281.0ms (2.4%)

simplify366.0ms (3.2%)

localize166.0ms (1.4%)

series71.0ms (0.6%)

simplify267.0ms (2.3%)

rewrite327.0ms (2.8%)

eval325.0ms (2.8%)

prune276.0ms (2.4%)

simplify149.0ms (1.3%)

localize195.0ms (1.7%)

series183.0ms (1.6%)

simplify548.0ms (4.7%)

rewrite490.0ms (4.2%)

eval479.0ms (4.1%)

prune279.0ms (2.4%)

simplify188.0ms (1.6%)

localize143.0ms (1.2%)

series39.0ms (0.3%)

simplify244.0ms (2.1%)

rewrite272.0ms (2.3%)

eval219.0ms (1.9%)

prune349.0ms (3%)

regimes188.0ms (1.6%)

regimes155.0ms (1.3%)

regimes143.0ms (1.2%)

regimes138.0ms (1.2%)

regimes132.0ms (1.1%)

regimes123.0ms (1.1%)

regimes9.0ms (0.1%)

regimes7.0ms (0.1%)

regimes6.0ms (0.1%)

regimes16.0ms (0.1%)

regimes38.0ms (0.3%)

regimes34.0ms (0.3%)

regimes28.0ms (0.2%)

regimes21.0ms (0.2%)

regimes13.0ms (0.1%)

regimes12.0ms (0.1%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

simplify11.0ms (0.1%)

soundness1.7s (15.1%)

preprocess119.0ms (1%)

end0.0ms (0%)

Profiling