Metrics for Migdal et al, Equation (64)

analyze0.0ms (0%)

Memory

0.6MiB live, 0.6MiB 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.1s (9.4%)

Memory

-5.5MiB live, 1 751.1MiB allocated

Samples

841.0ms

8 256×

valid

Precisions

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

ival-cos: 252.0ms (40% of total)

ival-mult: 214.0ms (34% of total)

ival-sqrt: 66.0ms (10.5% of total)

ival-div: 52.0ms (8.3% of total)

ival-add: 33.0ms (5.2% of total)

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

exact: 5.0ms (0.8% of total)

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

Bogosity

preprocess137.0ms (1.2%)

Memory

10.2MiB live, 47.6MiB 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)

explain264.0ms (2.2%)

Memory

-3.4MiB live, 240.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

52.0ms

512×

valid

Compiler

Compiled 160 to 52 computations (67.5% saved)

Precisions

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

ival-cos: 13.0ms (38.2% of total)

ival-mult: 11.0ms (32.3% of total)

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

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

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

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

exact: 0.0ms (0% of total)

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

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

1.5MiB live, 1.5MiB 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)

simplify7.0ms (0.1%)

Memory

12.0MiB live, 12.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Score	Program
✓	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 (.f64 a1 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 a2)
a2

localize65.0ms (0.6%)

Memory

-14.5MiB live, 60.9MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(+.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	99.8%	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
✓	accuracy	99.7%	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
✓	accuracy	98.9%	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

Samples

27.0ms

256×

valid

Compiler

Compiled 58 to 14 computations (75.9% saved)

Precisions

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

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

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

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

ival-div: 1.0ms (6.3% of total)

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

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

exact: 0.0ms (0% of total)

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

series16.0ms (0.1%)

Memory

25.3MiB live, 25.3MiB 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
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)))
1.0ms	th	@	0	(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))

simplify771.0ms (6.5%)

Memory

-12.2MiB live, 761.7MiB 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 (.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 (.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 (.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 (.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 (.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) (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 (.f64 a1 (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))
(/.f64 (.f64 a1 (.f64 a1 (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))
(/.f64 (.f64 a1 (.f64 a1 (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))
(/.f64 (.f64 a1 (.f64 a1 (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))
(/.f64 (.f64 a1 (.f64 a1 (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))
(/.f64 (.f64 a1 (.f64 a1 (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))
(/.f64 (.f64 a1 (.f64 a1 (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))
(/.f64 (.f64 a1 (.f64 a1 (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))
(/.f64 (.f64 a1 (.f64 a1 (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))
(/.f64 (.f64 a1 (.f64 a1 (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)))
(/ 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)))

rewrite531.0ms (4.5%)

Memory

12.7MiB live, 397.4MiB allocated

Algorithm

1×	batch-egg-rewrite

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 (.f64 a1 a1)) (/.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 (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 (.f64 a1 a1)) (/.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 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))))

eval116.0ms (1%)

Memory: -32.8MiB live, 88.2MiB allocated
Compiler: Compiled 14 708 to 1 018 computations (93.1% saved)

prune98.0ms (0.8%)

Memory

-10.2MiB live, 86.7MiB allocated

Pruning

19 alts after pruning (19 fresh and 0 done)

	Pruned	Kept	Total
New	471	19	490
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	472	19	491

Accuracy

100.0%

Counts

491 → 19

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.6%	(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))))))
	99.6%	(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
	99.6%	(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
	99.6%	(/.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)))
	16.2%	(/.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)))))
▶	16.2%	(/.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))))
	28.0%	(/.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)))
	28.1%	(/.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.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.4%	(/.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))))))
	99.3%	(/.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)))))
	35.6%	(+.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.6%	(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
▶	68.1%	#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.3%	#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))))
▶	50.5%	#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))))
	61.0%	#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 940 to 522 computations (44.5% saved)

simplify475.0ms (4%)

Memory

26.7MiB live, 301.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (*.f64 a2 a2)))))
✓	cost-diff	0	(.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))
✓	cost-diff	0	(/.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))))
✓	cost-diff	128	(-.f64 (.f64 a2 a2) (.f64 a1 a1))
✓	cost-diff	0	(*.f64 a1 a1)
✓	cost-diff	0	(/.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)))
✓	cost-diff	0	#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))))
✓	cost-diff	1344	(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th)))
✓	cost-diff	0	(/.f64 (cos.f64 th) (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)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
✓	cost-diff	0	(sqrt.f64 #s(literal 2 binary64))
✓	cost-diff	0	(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
✓	cost-diff	0	(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (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	0	(.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓	cost-diff	0	(cos.f64 th)
✓	cost-diff	0	(.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))
✓	cost-diff	7680	(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))))

Rules

12 206×	`lower-fma.f32`
12 194×	`lower-fma.f64`
4 834×	`lower-*.f32`
4 800×	`lower-*.f64`
2 194×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	48	477
0	82	418
1	169	379
2	354	371
3	841	371
4	2691	359
5	5880	359
0	8226	356

Stop Event

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

Calls

Call 1

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

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

localize235.0ms (2%)

Memory

-5.4MiB live, 301.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.8%	(.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)))
✓	accuracy	99.8%	(.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)))
✓	accuracy	95.0%	(-.f64 (.f64 a2 a2) (.f64 a1 a1))
✓	accuracy	24.6%	(/.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))))
✓	accuracy	99.6%	(/.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)))
✓	accuracy	92.9%	(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
✓	accuracy	88.6%	(/.f64 a2 (*.f64 a1 a1))
✓	accuracy	60.3%	(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th)))
✓	accuracy	100.0%	(sqrt.f64 #s(literal 2 binary64))
✓	accuracy	100.0%	(cos.f64 th)
✓	accuracy	99.7%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
✓	accuracy	98.9%	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
✓	accuracy	100.0%	(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
✓	accuracy	99.6%	(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓	accuracy	99.3%	(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
✓	accuracy	68.2%	#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	99.9%	(.f64 (cos.f64 th) (.f64 a1 a1))
✓	accuracy	99.8%	(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))))
✓	accuracy	99.7%	(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))
✓	accuracy	99.7%	(.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))

Samples

132.0ms

256×

valid

Compiler

Compiled 462 to 47 computations (89.8% saved)

Precisions

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

ival-mult: 54.0ms (52.2% of total)

ival-cos: 30.0ms (29% of total)

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

ival-add: 7.0ms (6.8% of total)

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

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

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

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

exact: 0.0ms (0% of total)

series85.0ms (0.7%)

Memory

-2.6MiB live, 157.4MiB allocated

Counts

27 → 648

Calls

Call 1

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

Outputs
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))) (taylor 0 th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))))) (taylor 0 th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))))))) (taylor 0 th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf th) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))))) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))))))) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt (.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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf a2) (#s(alt (.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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf a2) (#s(alt (.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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt (.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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor inf a1) (#s(alt (.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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor -inf a1) (#s(alt (.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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (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)) (patch (.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)) #<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 (+ (/ (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 (/ (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 (/ 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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (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 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 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 (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 (/ 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 (* (pow a2 2) (cos th)) (taylor 0 a1) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a2) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf a2) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf a2) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (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 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor 0 th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor 0 th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (* 1/24 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))))) (taylor 0 th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* 1/24 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))))))) (taylor 0 th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor inf th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor inf th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor inf th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor inf th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor -inf th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor -inf th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor -inf th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor -inf th) (#s(alt (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (patch (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<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 (.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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.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))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.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))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.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))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.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))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.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))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.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))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<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 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)) (taylor 0 th) (#s(alt (/.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))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (taylor 0 th) (#s(alt (/.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))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (taylor 0 th) (#s(alt (/.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))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (taylor 0 th) (#s(alt (/.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))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor inf th) (#s(alt (/.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))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor inf th) (#s(alt (/.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))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor inf th) (#s(alt (/.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))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor inf th) (#s(alt (/.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))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor -inf th) (#s(alt (/.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))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor -inf th) (#s(alt (/.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))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor -inf th) (#s(alt (/.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))) (patch (/.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))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor -inf th) (#s(alt (/.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))) (patch (/.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))) #<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 (* -1 (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a1 2)) (taylor inf a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a1 2)) (taylor -inf a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (patch (-.f64 (.f64 a2 a2) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.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)))) (patch (/.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)))) #<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 (.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (* -1 (* (pow a1 2) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (* (pow a1 2) (- (* (pow a1 2) (- (/ (cos th) (* (pow a2 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a2 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a2 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.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)))) (patch (/.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)))) #<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 (.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))) (taylor inf a1) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2))))))) (taylor inf a1) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.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)))) (patch (/.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)))) #<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 (.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))) (taylor -inf a1) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2))))))) (taylor -inf a1) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.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)))) (patch (/.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)))) #<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 (.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (* -1 (* (pow a2 2) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (* (pow a2 2) (- (* (pow a2 2) (- (/ (cos th) (* (pow a1 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a1 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a1 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.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)))) (patch (/.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)))) #<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 (.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))) (taylor inf a2) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2))))))) (taylor inf a2) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.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)))) (patch (/.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)))) #<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 (.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))) (taylor -inf a2) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2))))))) (taylor -inf a2) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor 0 th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.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)))) (patch (/.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor 0 a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor inf a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor -inf a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor 0 a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor inf a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor -inf a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* 1/24 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (* 1/24 (+ (pow a1 6) (pow a2 6))))))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (.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)) (patch (.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)) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor 0 a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor -inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor 0 a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor -inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) (patch (fma.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (.f64 a2 (.f64 a2 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor 0 th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.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 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))) (taylor 0 th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2)) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* 1/24 (* (pow a1 2) (pow th 2))))) (pow a1 2)) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (pow th 2))) (* 1/24 (pow a1 2)))))) (pow a1 2)) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (.f64 a1 a1)) (patch (.f64 (cos.f64 th) (.f64 a1 a1)) #<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 (/ a2 (pow a1 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 a2 (.f64 a1 a1)) (patch (/.f64 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (pow a1 2)) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (pow a1 2)) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (pow a1 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (pow a2 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (pow a1 2)) (pow a2 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (pow a1 2)) (pow a2 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (pow a1 2)) (pow a2 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (pow a2 4) (taylor inf a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (pow a2 4) (taylor -inf a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (pow a2 4) (taylor 0 a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a2 4)) (taylor 0 a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a2 4)) (taylor 0 a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a2 4)) (taylor 0 a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (pow a2 2))) (taylor inf a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (pow a2 2))) (taylor -inf a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) (patch (.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (sqrt 2)) (taylor 0 a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2))) (taylor 0 a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ (* -1 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2))) (taylor 0 a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ (* -1 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2))) (taylor 0 a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (sqrt 2)) (taylor inf a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4))))) (taylor inf a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4))))) (taylor inf a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (sqrt 2)) (taylor -inf a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4))))) (taylor -inf a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4))))) (taylor -inf a1) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (sqrt 2)) (taylor 0 a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* (pow a1 4) (sqrt 2))) (taylor 0 a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 4) (sqrt 2)) (* (pow a2 2) (+ (* -1 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (sqrt 2))))) (taylor 0 a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 4) (sqrt 2)) (* (pow a2 2) (+ (* -1 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (sqrt 2))))) (taylor 0 a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (sqrt 2)) (taylor inf a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4))))) (taylor inf a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4))))) (taylor inf a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (sqrt 2)) (taylor -inf a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4))))) (taylor -inf a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4))))) (taylor -inf a2) (#s(alt (.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))) (patch (.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))) #<representation binary64>) () ())) ())

Calls

162 calls:

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

simplify352.0ms (3%)

Memory

30.8MiB live, 628.8MiB allocated

Algorithm

1×	egg-herbie

Rules

12 432×	`lower-fma.f64`
12 432×	`lower-fma.f32`
6 606×	`lower-*.f64`
6 606×	`lower-*.f32`
2 576×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	445	9556
1	1575	8919
2	6169	8665
0	8076	8232

Stop Event

1×	iter limit
1×	node limit

Counts

648 → 648

Calls

Call 1

Inputs
(+ (* (pow a1 2) (sqrt 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) (* (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 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) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 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))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (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) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 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))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))))))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2))))))))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 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/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
(+ 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))
(+ (/ (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)))))
(/ 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)
(+ (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)
(/ 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))
(* (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) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+ (* -1/2 (* (pow a1 2) (* (pow th 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 th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (* 1/24 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))))))
(+ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* 1/24 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 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) (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) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 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)
(* -1 (pow a1 2))
(- (pow a2 2) (pow a1 2))
(- (pow a2 2) (pow a1 2))
(- (pow a2 2) (pow a1 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(pow a2 2)
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(pow a2 2)
(+ (* -1 (pow a1 2)) (pow a2 2))
(+ (* -1 (pow a1 2)) (pow a2 2))
(+ (* -1 (pow a1 2)) (pow a2 2))
(* -1 (pow a1 2))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* -1 (pow a1 2))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (* (pow a1 2) (- (* -1 (* (pow a1 2) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (* (pow a1 2) (- (* (pow a1 2) (- (* (pow a1 2) (- (/ (cos th) (* (pow a2 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a2 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a2 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (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) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (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) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (* (pow a2 2) (- (* -1 (* (pow a2 2) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(+ (* (pow a2 2) (- (* (pow a2 2) (- (* (pow a2 2) (- (/ (cos th) (* (pow a1 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a1 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a1 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (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)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (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) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(* (pow a2 6) (cos th))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(* (pow a1 6) (cos th))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (cos th))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (cos th))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(* (pow a2 6) (cos th))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (cos th))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(+ (pow a1 6) (pow a2 6))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (+ (pow a1 6) (pow a2 6)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* 1/24 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))))) (+ (pow a1 6) (pow a2 6)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (* 1/24 (+ (pow a1 6) (pow a2 6))))))) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(pow a2 6)
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(pow a1 6)
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(pow a1 6)
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(pow a1 6)
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(pow a2 6)
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(pow a2 6)
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a1 2) (sqrt 2))
(+ (* -1/2 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* (pow a1 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) (* (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)))
(pow a1 2)
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* 1/24 (* (pow a1 2) (pow th 2))))) (pow a1 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (pow th 2))) (* 1/24 (pow a1 2)))))) (pow a1 2))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (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))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(/ (pow a2 2) (pow a1 2))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(/ (pow a2 2) (pow a1 2))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(/ (pow a2 2) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 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) (+ (* -1 (pow a1 2)) (pow a2 2)))
(pow a2 4)
(* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(pow a2 4)
(* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 4) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(pow a2 4)
(+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a2 4))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a2 4))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a2 4))
(* -1 (* (pow a1 2) (pow a2 2)))
(* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2))))
(* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2))))
(* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2))))
(* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2))))
(* (pow a1 2) (+ (* -1 (pow a2 2)) (/ (pow a2 4) (pow a1 2))))
(* (pow a2 4) (sqrt 2))
(+ (* -1 (* (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2)))
(+ (* (pow a1 2) (+ (* -1 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2)))
(+ (* (pow a1 2) (+ (* -1 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2)))
(* (pow a1 4) (sqrt 2))
(* (pow a1 4) (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(* (pow a1 4) (sqrt 2))
(* (pow a1 4) (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(* (pow a1 4) (sqrt 2))
(+ (* -1 (* (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* (pow a1 4) (sqrt 2)))
(+ (* (pow a1 4) (sqrt 2)) (* (pow a2 2) (+ (* -1 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (sqrt 2)))))
(+ (* (pow a1 4) (sqrt 2)) (* (pow a2 2) (+ (* -1 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 4) (sqrt 2))
(* (pow a2 4) (+ (sqrt 2) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))
(* (pow a2 4) (sqrt 2))
(* (pow a2 4) (+ (sqrt 2) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))

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

rewrite347.0ms (2.9%)

Memory

-30.2MiB live, 733.2MiB allocated

Algorithm

1×	batch-egg-rewrite

Rules

4 564×	`lower-*.f32`
4 530×	`lower-*.f64`
4 352×	`lower-/.f32`
4 340×	`lower-/.f64`
3 858×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	48	363
0	82	298
1	301	273
2	2293	269
0	8412	267

Stop Event

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

Counts

27 → 1 052

Calls

Call 1

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

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

eval240.0ms (2%)

Memory: 19.7MiB live, 487.6MiB allocated
Compiler: Compiled 66 729 to 3 256 computations (95.1% saved)

prune218.0ms (1.9%)

Memory

11.2MiB live, 446.2MiB allocated

Pruning

24 alts after pruning (24 fresh and 0 done)

	Pruned	Kept	Total
New	1 989	21	2 010
Fresh	11	3	14
Picked	5	0	5
Done	0	0	0
Total	2 005	24	2 029

Accuracy

100.0%

Counts

2 029 → 24

Alt Table

Click to see full alt table

Status	Accuracy	Program
	8.6%	(/.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(approx (cos th) #s(literal 1 binary64))) (.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))))
	61.0%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
	68.0%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
	99.6%	(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
	68.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal 1/2 binary64))
▶	99.3%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 1/2 binary64))
	99.3%	(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
	99.3%	#s(approx (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
	67.8%	#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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
	68.1%	#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 (sqrt.f64 #s(literal 2 binary64))) a2)))
	62.3%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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))))
	67.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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))))))
	55.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 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)))))
	54.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))
▶	15.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.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)))))
	99.3%	#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))))
	34.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
	61.0%	#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))))))
▶	34.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
	68.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 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
▶	14.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 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	39.9%	#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 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
▶	99.6%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))))
	68.1%	#s(approx (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))

Compiler

Compiled 960 to 534 computations (44.4% saved)

simplify263.0ms (2.2%)

Memory

10.7MiB live, 497.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(sqrt.f64 #s(literal 2 binary64))
✓	cost-diff	0	(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))
✓	cost-diff	0	#s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))))
✓	cost-diff	0	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 1/2 binary64))
✓	cost-diff	0	(.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
✓	cost-diff	0	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.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)))))
✓	cost-diff	384	(/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))
✓	cost-diff	2816	(/.f64 (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.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))))
✓	cost-diff	0	(*.f64 a1 a1)
✓	cost-diff	0	#s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (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) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
✓	cost-diff	1024	(.f64 (.f64 a1 a1) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
✓	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	(sqrt.f64 #s(literal 2 binary64))
✓	cost-diff	0	(*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
✓	cost-diff	0	(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))))
✓	cost-diff	0	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))))

Rules

8 074×	`lower-fma.f32`
8 068×	`lower-fma.f64`
4 578×	`lower-+.f32`
4 576×	`lower-+.f64`
3 152×	`lower-*.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	62	518
0	97	504
1	183	492
2	461	476
3	1516	444
4	4500	429
0	8037	422

Stop Event

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

Calls

Call 1

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

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

localize319.0ms (2.7%)

Memory

-27.6MiB live, 206.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.9%	(.f64 a2 (.f64 a2 (cos.f64 th)))
✓	accuracy	99.8%	(*.f64 a2 (cos.f64 th))
✓	accuracy	99.7%	(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))
✓	accuracy	99.7%	#s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th)))))
✓	accuracy	99.8%	(.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
✓	accuracy	99.6%	(/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))
✓	accuracy	68.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.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)))))
✓	accuracy	37.2%	(/.f64 (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.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))))
✓	accuracy	92.9%	(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
✓	accuracy	88.6%	(/.f64 a2 (*.f64 a1 a1))
✓	accuracy	68.2%	#s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
✓	accuracy	60.9%	(.f64 (.f64 a1 a1) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
✓	accuracy	100.0%	(sqrt.f64 #s(literal 2 binary64))
✓	accuracy	99.7%	(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
✓	accuracy	68.2%	#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	16.3%	#s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
✓	accuracy	100.0%	(cos.f64 th)
✓	accuracy	100.0%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))))
✓	accuracy	99.7%	(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))))
✓	accuracy	99.6%	(*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))

Samples

164.0ms

256×

valid

Compiler

Compiled 389 to 50 computations (87.1% saved)

Precisions

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

ival-div: 37.0ms (45.2% of total)

ival-mult: 28.0ms (34.2% of total)

ival-add: 7.0ms (8.5% of total)

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

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

ival-sub: 1.0ms (1.2% 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

29.8MiB live, 68.0MiB allocated

Counts

24 → 600

Calls

Call 1

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

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

Calls

150 calls:

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

simplify476.0ms (4%)

Memory

-11.7MiB live, 419.6MiB allocated

Algorithm

1×	egg-herbie

Rules

12 570×	`lower-fma.f64`
12 570×	`lower-fma.f32`
6 530×	`lower-*.f64`
6 530×	`lower-*.f32`
2 576×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	551	9109
1	1898	8301
2	7368	8293
0	8561	7844

Stop Event

1×	iter limit
1×	node limit

Counts

600 → 599

Calls

Call 1

Inputs
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))))))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2))))))))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 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/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 (* (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)))))
(sqrt 2)
(+ (sqrt 2) (* -1/2 (* (pow th 2) (sqrt 2))))
(+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))))
(+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (sqrt 2))) (* 1/24 (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))
(+ (/ (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) (+ (/ 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)))))
(/ (* (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) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 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 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 4))
(+ (* -1/2 (pow a1 4)) (* 1/2 (* a2 (+ (* -1 (pow a1 3)) (pow a1 3)))))
(+ (* -1/2 (pow a1 4)) (* a2 (+ (* 1/2 (* a2 (+ (* -1 (pow a1 2)) (pow a1 2)))) (* 1/2 (+ (* -1 (pow a1 3)) (pow a1 3))))))
(+ (* -1/2 (pow a1 4)) (* a2 (+ (* 1/2 (+ (* -1 (pow a1 3)) (pow a1 3))) (* a2 (+ (* 1/2 (* a2 (+ a1 (* -1 a1)))) (* 1/2 (+ (* -1 (pow a1 2)) (pow a1 2))))))))
(* 1/2 (pow a2 4))
(* (pow a2 4) (+ 1/2 (* 1/2 (/ (+ a1 (* -1 a1)) a2))))
(* (pow a2 4) (+ 1/2 (+ (* 1/2 (/ (+ a1 (* -1 a1)) a2)) (* 1/2 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2))))))
(* (pow a2 4) (+ 1/2 (+ (* 1/2 (/ (+ a1 (* -1 a1)) a2)) (+ (* 1/2 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2))) (* 1/2 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) (pow a2 3)))))))
(* 1/2 (pow a2 4))
(* (pow a2 4) (+ 1/2 (* 1/2 (/ (+ a1 (* -1 a1)) a2))))
(* (pow a2 4) (+ 1/2 (* -1 (/ (+ (* -1/2 (+ a1 (* -1 a1))) (* 1/2 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) a2))) a2))))
(* (pow a2 4) (+ 1/2 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (+ (* -1 (pow a1 2)) (pow a1 2))) (* 1/2 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) a2))) a2)) (* -1/2 (+ a1 (* -1 a1)))) a2))))
(* 1/2 (pow a2 4))
(+ (* 1/2 (* a1 (+ (* -1 (pow a2 3)) (pow a2 3)))) (* 1/2 (pow a2 4)))
(+ (* 1/2 (pow a2 4)) (* a1 (+ (* 1/2 (* a1 (+ (* -1 (pow a2 2)) (pow a2 2)))) (* 1/2 (+ (* -1 (pow a2 3)) (pow a2 3))))))
(+ (* 1/2 (pow a2 4)) (* a1 (+ (* 1/2 (+ (* -1 (pow a2 3)) (pow a2 3))) (* a1 (+ (* 1/2 (* a1 (+ a2 (* -1 a2)))) (* 1/2 (+ (* -1 (pow a2 2)) (pow a2 2))))))))
(* -1/2 (pow a1 4))
(* (pow a1 4) (- (* 1/2 (/ (+ a2 (* -1 a2)) a1)) 1/2))
(* (pow a1 4) (- (+ (* 1/2 (/ (+ a2 (* -1 a2)) a1)) (* 1/2 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (pow a1 2)))) 1/2))
(* (pow a1 4) (- (+ (* 1/2 (/ (+ a2 (* -1 a2)) a1)) (+ (* 1/2 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (pow a1 2))) (* 1/2 (/ (+ (* -1 (pow a2 3)) (pow a2 3)) (pow a1 3))))) 1/2))
(* -1/2 (pow a1 4))
(* (pow a1 4) (- (* -1/2 (/ (+ a2 (* -1 a2)) a1)) 1/2))
(* (pow a1 4) (- (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) a1)) (* 1/2 (+ a2 (* -1 a2)))) a1)) 1/2))
(* (pow a1 4) (- (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (pow a2 3)) (pow a2 3)) a1)) (* 1/2 (+ (* -1 (pow a2 2)) (pow a2 2)))) a1)) (* 1/2 (+ a2 (* -1 a2)))) a1)) 1/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 (pow a1 4))
(+ (* -1 (pow a1 4)) (* a2 (+ (* -1 (pow a1 3)) (pow a1 3))))
(+ (* -1 (pow a1 4)) (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a1 3)))))
(+ (* -1 (pow a1 4)) (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (+ (* a2 (+ a1 (* -1 a1))) (pow a1 2)))) (pow a1 3)))))
(pow a2 4)
(* (pow a2 4) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))
(* (pow a2 4) (+ 1 (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 2) (pow a2 2)))))))
(* (pow a2 4) (+ 1 (+ (* -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)))))))))
(pow a2 4)
(* (pow a2 4) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))
(* (pow a2 4) (+ 1 (* -1 (/ (+ (* -1 (+ a1 (* -1 a1))) (+ (* -1 (/ (pow a1 2) a2)) (/ (pow a1 2) a2))) a2))))
(* (pow a2 4) (+ 1 (* -1 (/ (+ (* -1 (+ a1 (* -1 a1))) (* -1 (/ (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (/ (pow a1 3) a2)) (/ (pow a1 3) a2))) a2))) a2))))
(pow a2 4)
(+ (* a1 (+ (* -1 (pow a2 3)) (pow a2 3))) (pow a2 4))
(+ (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a2 3)))) (pow a2 4))
(+ (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (+ (* a1 (+ a2 (* -1 a2))) (pow a2 2)))) (pow a2 3)))) (pow a2 4))
(* -1 (pow a1 4))
(* (pow a1 4) (- (+ (* -1 (/ a2 a1)) (/ a2 a1)) 1))
(* (pow a1 4) (- (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (/ a2 a1) (/ (pow a2 2) (pow a1 2))))) 1))
(* (pow a1 4) (- (+ (* -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))))))) 1))
(* -1 (pow a1 4))
(* (pow a1 4) (- (* -1 (/ (+ a2 (* -1 a2)) a1)) 1))
(* (pow a1 4) (- (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) a1)))) a1)) 1))
(* (pow a1 4) (- (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a2 3)) (pow a2 3)) a1)) (+ (* -1 (pow a2 2)) (pow a2 2))) a1)))) a1)) 1))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))))))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2))))))))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 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/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)))))
(+ (* (pow a1 2) (sqrt 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) (* (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 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) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 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))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (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) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 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))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 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) (sqrt 2))
(+ (* -1/2 (* (pow a2 2) (* (pow th 2) (sqrt 2)))) (* (pow a2 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) (* (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)))
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)
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(/ (pow a2 2) (pow a1 2))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(/ (pow a2 2) (pow a1 2))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(/ (pow a2 2) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(* -1 (/ (pow a1 2) (sqrt 2)))
(+ (* -1 (/ (pow a1 2) (sqrt 2))) (* a2 (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))))
(+ (* -1 (/ (pow a1 2) (sqrt 2))) (* a2 (+ (* -1 (/ a1 (sqrt 2))) (+ (/ a1 (sqrt 2)) (/ a2 (sqrt 2))))))
(+ (* -1 (/ (pow a1 2) (sqrt 2))) (* a2 (+ (* -1 (/ a1 (sqrt 2))) (+ (/ a1 (sqrt 2)) (/ a2 (sqrt 2))))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2))))))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (* -1 (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2)))))))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (* -1 (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2)))))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2))))))
(* (pow a2 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (* a2 (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(* (pow a2 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (* a2 (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(/ (pow a2 2) (sqrt 2))
(+ (* a1 (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))
(+ (* a1 (+ (* -1 (/ a1 (sqrt 2))) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+ (* a1 (+ (* -1 (/ a1 (sqrt 2))) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(* -1 (/ (pow a1 2) (sqrt 2)))
(* (pow a1 2) (- (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (/ a2 (* a1 (sqrt 2)))) (/ 1 (sqrt 2))))
(* (pow a1 2) (- (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (+ (/ a2 (* a1 (sqrt 2))) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (/ 1 (sqrt 2))))
(* (pow a1 2) (- (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (+ (/ a2 (* a1 (sqrt 2))) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (/ 1 (sqrt 2))))
(* -1 (/ (pow a1 2) (sqrt 2)))
(* (pow a1 2) (- (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))
(* (pow a1 2) (- (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (pow a2 2) (* a1 (sqrt 2)))) (/ a2 (sqrt 2)))) a1)) (/ 1 (sqrt 2))))
(* (pow a1 2) (- (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (pow a2 2) (* a1 (sqrt 2)))) (/ a2 (sqrt 2)))) a1)) (/ 1 (sqrt 2))))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
a2
(+ a2 (* -1/2 (* a2 (pow th 2))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(pow a2 2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2)))))) (pow a2 2))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))

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

rewrite505.0ms (4.3%)

Memory

-7.9MiB live, 353.2MiB allocated

Algorithm

1×	batch-egg-rewrite

Rules

5 972×	`lower-*.f32`
5 948×	`lower-*.f64`
4 938×	`lower-/.f32`
4 926×	`lower-/.f64`
4 102×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	62	437
0	97	402
1	325	354
2	2636	343
0	9166	340

Stop Event

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

Counts

24 → 798

Calls

Call 1

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

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

eval349.0ms (3%)

Memory: 10.3MiB live, 278.0MiB allocated
Compiler: Compiled 36 857 to 2 656 computations (92.8% saved)

prune369.0ms (3.1%)

Memory

8.6MiB live, 423.1MiB allocated

Pruning

41 alts after pruning (38 fresh and 3 done)

	Pruned	Kept	Total
New	1 478	24	1 502
Fresh	5	14	19
Picked	2	3	5
Done	0	0	0
Total	1 485	41	1 526

Accuracy

100.0%

Counts

1 526 → 41

Alt Table

Click to see full alt table

Status	Accuracy	Program
	8.6%	(/.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(approx (cos th) #s(literal 1 binary64))) (.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))))
	61.0%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
	68.0%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
	99.3%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (cos.f64 th))) a2)) #s(literal 1/2 binary64))
▶	99.4%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64))
	99.3%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) #s(literal 1/2 binary64))
	68.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal 1/2 binary64))
	99.4%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 1/2 binary64))
✓	99.3%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 1/2 binary64))
▶	59.8%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64))
	68.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx ( a2 (* a2 (cos th))) (*.f64 a2 a2)))) #s(literal 1/2 binary64))
	99.3%	(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
	67.8%	#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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
	68.1%	#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 (sqrt.f64 #s(literal 2 binary64))) a2)))
	62.3%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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))))
▶	67.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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))))))
	55.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 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)))))
	14.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (-.f64 (.f64 (.f64 a2 a2) (neg.f64 (.f64 a2 a2))) (.f64 (.f64 a1 a1) (neg.f64 (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
	8.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64)) #s(approx (/ ( (+ a2 a1) (- a2 a1)) (sqrt 2)) (neg.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))))
	57.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (.f64 a1 a1)))) (+.f64 a2 a1)) (/.f64 (-.f64 a2 a1) (sqrt.f64 #s(literal 2 binary64)))))
▶	15.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
	99.3%	#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))))
	34.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
	61.0%	#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))))))
	68.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) #s(literal 1/2 binary64)) (/.f64 (-.f64 a2 a1) (sqrt.f64 #s(literal 2 binary64))))))
	18.3%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (-.f64 a2 a1) #s(literal 2 binary64))))
	18.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 (-.f64 a2 a1) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))))
▶	14.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
	34.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
	42.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
	38.5%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 (fma.f64 a2 (/.f64 #s(literal 1 binary64) (/.f64 a1 (/.f64 a2 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
	34.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 (fma.f64 a2 (.f64 (/.f64 #s(literal 1 binary64) (.f64 a1 a1)) a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
	29.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 #s(approx (+ (* a2 (/ a2 (* a1 a1))) 1) (/.f64 (.f64 a2 a2) (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))))
	68.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) #s(approx (* (* a1 a1) (/ (+ (* a2 (/ a2 (* a1 a1))) 1) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
	34.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) #s(approx (* (* a1 a1) (/ (+ (* a2 (/ a2 (* a1 a1))) 1) (sqrt 2))) (.f64 (.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))))
✓	14.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 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	14.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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
	14.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
	14.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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
✓	99.6%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))))
	68.1%	#s(approx (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))

Compiler

Compiled 1 630 to 924 computations (43.3% saved)

simplify221.0ms (1.9%)

Memory

9.6MiB live, 318.4MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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))))))
✓	cost-diff	512	(/.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)))))
✓	cost-diff	1088	(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))))
✓	cost-diff	1728	(*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
✓	cost-diff	0	(fma.f64 a2 a2 (*.f64 a1 a1))
✓	cost-diff	0	(.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
✓	cost-diff	0	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
✓	cost-diff	2112	(/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
✓	cost-diff	0	(sqrt.f64 #s(literal 2 binary64))
✓	cost-diff	0	(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
✓	cost-diff	0	#s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
✓	cost-diff	0	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64))
✓	cost-diff	0	(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
✓	cost-diff	0	(.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
✓	cost-diff	0	#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (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 (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
✓	cost-diff	0	(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
✓	cost-diff	0	(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))
✓	cost-diff	0	#s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th)))
✓	cost-diff	0	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64))

Rules

6 164×	`lower-fma.f32`
6 158×	`lower-fma.f64`
4 454×	`lower-*.f32`
4 420×	`lower-*.f64`
2 018×	`lower-+.f32`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	64	569
0	102	560
1	195	543
2	512	439
3	1841	427
4	6698	419
0	8619	419

Stop Event

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

Calls

Call 1

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

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

localize159.0ms (1.4%)

Memory

-1.3MiB live, 235.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.7%	(.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1)))
✓	accuracy	99.7%	(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))))
✓	accuracy	98.4%	(*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
✓	accuracy	68.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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))))))
✓	accuracy	99.8%	(.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
✓	accuracy	99.7%	(.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))
✓	accuracy	68.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
✓	accuracy	37.3%	(/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
✓	accuracy	99.8%	(.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
✓	accuracy	99.7%	(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
✓	accuracy	99.7%	#s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
✓	accuracy	51.0%	#s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
✓	accuracy	99.8%	(.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
✓	accuracy	99.3%	(.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
✓	accuracy	68.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
✓	accuracy	16.3%	#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))
✓	accuracy	100.0%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64))
✓	accuracy	99.8%	(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))
✓	accuracy	99.7%	(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
✓	accuracy	99.7%	#s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th)))

Samples

89.0ms

256×

valid

Compiler

Compiled 402 to 51 computations (87.3% saved)

Precisions

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

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

ival-div: 8.0ms (13.1% of total)

ival-add: 6.0ms (9.8% of total)

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

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

ival-neg: 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)

series43.0ms (0.4%)

Memory

-17.8MiB live, 60.6MiB allocated

Counts

24 → 552

Calls

Call 1

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

Outputs
#s(alt (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))))))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor -inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))) (taylor 0 th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))))) (taylor 0 th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))))))) (taylor 0 th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (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 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (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 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (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 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (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 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (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 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (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 #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th))) (patch #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor 0 th) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<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 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))) (taylor 0 th) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 th) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (cos.f64 th)) (patch (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (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 (+ (/ (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 (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (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 (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (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 (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (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 (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #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 (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor inf a2) (#s(alt #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor -inf a2) (#s(alt #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #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 #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (/ (/ ( (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 a1 (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor inf a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* a1 (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (patch (.f64 a1 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))))))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor -inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #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 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))) (taylor 0 th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))))) (taylor 0 th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))))))) (taylor 0 th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor 0 th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<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 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))) (taylor 0 th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 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))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ ( (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a1 4)) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 4)) (* a2 (+ (* -1 (pow a1 3)) (pow a1 3)))) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 4)) (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a1 3))))) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 4)) (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (+ (* a2 (+ a1 (* -1 a1))) (pow a1 2)))) (pow a1 3))))) (taylor 0 a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (pow a2 4) (taylor inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2)))) (taylor inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 2) (pow a2 2))))))) (taylor inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (+ (* -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))))))))) (taylor inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (pow a2 4) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2)))) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (* -1 (/ (+ (* -1 (+ a1 (* -1 a1))) (+ (* -1 (/ (pow a1 2) a2)) (/ (pow a1 2) a2))) a2)))) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ 1 (* -1 (/ (+ (* -1 (+ a1 (* -1 a1))) (* -1 (/ (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (/ (pow a1 3) a2)) (/ (pow a1 3) a2))) a2))) a2)))) (taylor -inf a2) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (pow a2 4) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* a1 (+ (* -1 (pow a2 3)) (pow a2 3))) (pow a2 4)) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a2 3)))) (pow a2 4)) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (+ (* a1 (+ a2 (* -1 a2))) (pow a2 2)))) (pow a2 3)))) (pow a2 4)) (taylor 0 a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a1 4)) (taylor inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (- (+ (* -1 (/ a2 a1)) (/ a2 a1)) 1)) (taylor inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (- (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (/ a2 a1) (/ (pow a2 2) (pow a1 2))))) 1)) (taylor inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (- (+ (* -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))))))) 1)) (taylor inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a1 4)) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (- (* -1 (/ (+ a2 (* -1 a2)) a1)) 1)) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (- (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) a1)))) a1)) 1)) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (- (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a2 3)) (pow a2 3)) a1)) (+ (* -1 (pow a2 2)) (pow a2 2))) a1)))) a1)) 1)) (taylor -inf a1) (#s(alt (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (patch (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #<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 (* -1 (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 2) (sqrt 2))) (taylor inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 2) (sqrt 2))) (taylor -inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<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 (.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))))) (patch (/.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))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<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 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)))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<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 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor 0 a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor 0 a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor 0 a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor 0 a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor inf a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor inf a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor inf a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor inf a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor -inf a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor -inf a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor -inf a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor -inf a2) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt a2 (taylor 0 th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ a2 (* -1/2 (* a2 (pow th 2)))) (taylor 0 th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2)))))) (taylor 0 th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2)))))) (taylor 0 th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor inf th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor inf th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor inf th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor inf th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor -inf th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor -inf th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor -inf th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a2 (cos th)) (taylor -inf th) (#s(alt (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (patch (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (sqrt 2))) (* a2 (* (sqrt 2) (+ a1 (* -1 a1))))) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (sqrt 2))) (* a2 (+ (* a2 (sqrt 2)) (* (sqrt 2) (+ a1 (* -1 a1)))))) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (sqrt 2))) (* a2 (+ (* a2 (sqrt 2)) (* (sqrt 2) (+ a1 (* -1 a1)))))) (taylor 0 a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2))) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2)))) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2)))) (taylor inf a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2))) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a1 (* -1 a1)))) (/ (* (pow a1 2) (sqrt 2)) a2)) a2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a1 (* -1 a1)))) (/ (* (pow a1 2) (sqrt 2)) a2)) a2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a1 (* (sqrt 2) (+ a2 (* -1 a2)))) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a1 (+ (* -1 (* a1 (sqrt 2))) (* (sqrt 2) (+ a2 (* -1 a2))))) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* a1 (+ (* -1 (* a1 (sqrt 2))) (* (sqrt 2) (+ a2 (* -1 a2))))) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) a1)) (* (sqrt 2) (+ a2 (* -1 a2)))) a1)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) a1)) (* (sqrt 2) (+ a2 (* -1 a2)))) a1)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) (patch (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1))) #<representation binary64>) () ())) ())

Calls

138 calls:

Time	Variable		Point	Expression
1.0ms	a2	@	0	(/ (+ (* (* a2 a2) (neg (sqrt 2))) (* (sqrt 2) (neg (* a1 a1)))) (* (sqrt 2) (neg (sqrt 2))))
1.0ms	a1	@	0	(/ (+ (* (* a2 a2) (neg (sqrt 2))) (* (sqrt 2) (neg (* a1 a1)))) (* (sqrt 2) (neg (sqrt 2))))
0.0ms	a1	@	inf	(/ (+ (* (* a2 a2) (neg (sqrt 2))) (* (sqrt 2) (neg (* a1 a1)))) (* (sqrt 2) (neg (sqrt 2))))
0.0ms	a2	@	0	(+ (* (* a2 a2) (neg (sqrt 2))) (* (sqrt 2) (neg (* a1 a1))))
0.0ms	a2	@	inf	(/ (+ (* (* a2 a2) (neg (sqrt 2))) (* (sqrt 2) (neg (* a1 a1)))) (* (sqrt 2) (neg (sqrt 2))))

simplify345.0ms (2.9%)

Memory

23.9MiB live, 496.6MiB allocated

Algorithm

1×	egg-herbie

Rules

12 242×	`lower-fma.f64`
12 242×	`lower-fma.f32`
5 252×	`lower-*.f64`
5 252×	`lower-*.f32`
3 118×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	376	8348
1	1317	7832
2	4899	7353
0	8268	6966

Stop Event

1×	iter limit
1×	node limit

Counts

552 → 551

Calls

Call 1

Inputs
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))))))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2))))))))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 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/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)))))
(+ (* (pow a1 2) (sqrt 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) (* (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 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) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 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))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (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) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 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))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 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) (sqrt 2))
(+ (* -1/2 (* (pow a2 2) (* (pow th 2) (sqrt 2)))) (* (pow a2 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) (* (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) (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))
(+ (/ (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) (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 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 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)))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))))))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2))))))))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 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/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)))))
(+ (* (pow a1 2) (sqrt 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) (* (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 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) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 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))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (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) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 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))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 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) (sqrt 2))
(+ (* -1/2 (* (pow a2 2) (* (pow th 2) (sqrt 2)))) (* (pow a2 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) (* (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 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) (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 (pow a1 4))
(+ (* -1 (pow a1 4)) (* a2 (+ (* -1 (pow a1 3)) (pow a1 3))))
(+ (* -1 (pow a1 4)) (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (pow a1 2))) (pow a1 3)))))
(+ (* -1 (pow a1 4)) (* a2 (+ (* -1 (pow a1 3)) (+ (* a2 (+ (* -1 (pow a1 2)) (+ (* a2 (+ a1 (* -1 a1))) (pow a1 2)))) (pow a1 3)))))
(pow a2 4)
(* (pow a2 4) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))
(* (pow a2 4) (+ 1 (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (/ a1 a2) (/ (pow a1 2) (pow a2 2)))))))
(* (pow a2 4) (+ 1 (+ (* -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)))))))))
(pow a2 4)
(* (pow a2 4) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))
(* (pow a2 4) (+ 1 (* -1 (/ (+ (* -1 (+ a1 (* -1 a1))) (+ (* -1 (/ (pow a1 2) a2)) (/ (pow a1 2) a2))) a2))))
(* (pow a2 4) (+ 1 (* -1 (/ (+ (* -1 (+ a1 (* -1 a1))) (* -1 (/ (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (/ (pow a1 3) a2)) (/ (pow a1 3) a2))) a2))) a2))))
(pow a2 4)
(+ (* a1 (+ (* -1 (pow a2 3)) (pow a2 3))) (pow a2 4))
(+ (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (pow a2 2))) (pow a2 3)))) (pow a2 4))
(+ (* a1 (+ (* -1 (pow a2 3)) (+ (* a1 (+ (* -1 (pow a2 2)) (+ (* a1 (+ a2 (* -1 a2))) (pow a2 2)))) (pow a2 3)))) (pow a2 4))
(* -1 (pow a1 4))
(* (pow a1 4) (- (+ (* -1 (/ a2 a1)) (/ a2 a1)) 1))
(* (pow a1 4) (- (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (/ a2 a1) (/ (pow a2 2) (pow a1 2))))) 1))
(* (pow a1 4) (- (+ (* -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))))))) 1))
(* -1 (pow a1 4))
(* (pow a1 4) (- (* -1 (/ (+ a2 (* -1 a2)) a1)) 1))
(* (pow a1 4) (- (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) a1)))) a1)) 1))
(* (pow a1 4) (- (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a2 3)) (pow a2 3)) a1)) (+ (* -1 (pow a2 2)) (pow a2 2))) a1)))) a1)) 1))
(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))))
(* -1 (* (pow a1 2) (sqrt 2)))
(+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2))))
(+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2))))
(+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2))))
(* -1 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* -1 (* (pow a2 2) (sqrt 2)))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* -1 (* (pow a2 2) (sqrt 2)))
(+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2))))
(+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2))))
(+ (* -1 (* (pow a1 2) (sqrt 2))) (* -1 (* (pow a2 2) (sqrt 2))))
(* -1 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* -1 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (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) (+ (/ 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) (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
(+ 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)
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
a2
(+ a2 (* -1/2 (* a2 (pow th 2))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* -1 (* (pow a1 2) (sqrt 2)))
(+ (* -1 (* (pow a1 2) (sqrt 2))) (* a2 (* (sqrt 2) (+ a1 (* -1 a1)))))
(+ (* -1 (* (pow a1 2) (sqrt 2))) (* a2 (+ (* a2 (sqrt 2)) (* (sqrt 2) (+ a1 (* -1 a1))))))
(+ (* -1 (* (pow a1 2) (sqrt 2))) (* a2 (+ (* a2 (sqrt 2)) (* (sqrt 2) (+ a1 (* -1 a1))))))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2)))
(* (pow a2 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2))))
(* (pow a2 2) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2))))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (sqrt 2) (/ (* (sqrt 2) (+ a1 (* -1 a1))) a2)))
(* (pow a2 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a1 (* -1 a1)))) (/ (* (pow a1 2) (sqrt 2)) a2)) a2))))
(* (pow a2 2) (+ (sqrt 2) (* -1 (/ (+ (* -1 (* (sqrt 2) (+ a1 (* -1 a1)))) (/ (* (pow a1 2) (sqrt 2)) a2)) a2))))
(* (pow a2 2) (sqrt 2))
(+ (* a1 (* (sqrt 2) (+ a2 (* -1 a2)))) (* (pow a2 2) (sqrt 2)))
(+ (* a1 (+ (* -1 (* a1 (sqrt 2))) (* (sqrt 2) (+ a2 (* -1 a2))))) (* (pow a2 2) (sqrt 2)))
(+ (* a1 (+ (* -1 (* a1 (sqrt 2))) (* (sqrt 2) (+ a2 (* -1 a2))))) (* (pow a2 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1)))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (+ (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* -1 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (* (sqrt 2) (+ a2 (* -1 a2))) a1))))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) a1)) (* (sqrt 2) (+ a2 (* -1 a2)))) a1))))
(* (pow a1 2) (+ (* -1 (sqrt 2)) (* -1 (/ (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) a1)) (* (sqrt 2) (+ a2 (* -1 a2)))) a1))))
(* -1 (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))
(* -1 (* (pow a1 2) (sqrt 2)))

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

rewrite340.0ms (2.9%)

Memory

3.8MiB live, 550.0MiB allocated

Algorithm

1×	batch-egg-rewrite

Rules

6 254×	`lower-fma.f32`
6 248×	`lower-fma.f64`
5 514×	`lower-/.f32`
5 510×	`lower-/.f64`
4 116×	`lower-*.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	64	482
0	102	463
1	312	368
2	2308	359
0	8797	352

Stop Event

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

Counts

24 → 454

Calls

Call 1

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

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

eval158.0ms (1.3%)

Memory: 1.8MiB live, 280.8MiB allocated
Compiler: Compiled 26 472 to 1 633 computations (93.8% saved)

prune263.0ms (2.2%)

Memory

2.1MiB live, 456.6MiB allocated

Pruning

47 alts after pruning (41 fresh and 6 done)

	Pruned	Kept	Total
New	1 038	23	1 061
Fresh	15	18	33
Picked	2	3	5
Done	0	3	3
Total	1 055	47	1 102

Accuracy

100.0%

Counts

1 102 → 47

Alt Table

Click to see full alt table

Status	Accuracy	Program
	61.0%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
	68.0%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
	59.7%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64))
	59.7%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)))) a2)) #s(literal 1/2 binary64))
	99.3%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (cos.f64 th))) a2)) #s(literal 1/2 binary64))
✓	99.4%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64))
	99.3%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) #s(literal 1/2 binary64))
	99.4%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
	68.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal 1/2 binary64))
✓	99.3%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 1/2 binary64))
✓	59.8%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 a2 #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) #s(literal 1/2 binary64))
	68.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx ( a2 (* a2 (cos th))) (*.f64 a2 a2)))) #s(literal 1/2 binary64))
	99.3%	(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
	68.1%	#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 (sqrt.f64 #s(literal 2 binary64))) a2)))
	67.7%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #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))))))
	68.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
	56.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (+.f64 a2 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a2 a1))))
	12.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (+.f64 a2 a1)) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
	12.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 a2 a1) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))))) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
	8.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(approx ( (* (+ a2 a1) (- a2 a1)) (sqrt 2)) (.f64 (.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))))
	15.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(approx ( (* (+ a2 a1) (- a2 a1)) (sqrt 2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)))))
	15.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (-.f64 a2 a1) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
	15.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
	99.3%	#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))))
	67.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (neg.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
	67.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* (* a2 a2) (neg (sqrt 2))) (* (sqrt 2) (neg (* a1 a1)))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
	56.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a2 a1)) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (+.f64 a2 a1)))))
	67.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
	60.5%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (/.f64 (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (+.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))))
	67.7%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (-.f64 a2 a1) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a2 a1)))))
	18.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 (-.f64 a2 a1) (.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))))
	17.7%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (.f64 (-.f64 a2 a1) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))))
	60.5%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 #s(literal 1/2 binary64) (+.f64 a2 a1))) (sqrt.f64 #s(literal 2 binary64))))
	14.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1/2 binary64))))
✓	14.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (* (+ a2 a1) (- a2 a1))) 2) (/ (* (+ a2 a1) (- a2 a1)) (sqrt 2))) (.f64 a1 (.f64 a1 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
	68.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (neg (sqrt 2))) (* (sqrt 2) (neg (* a1 a1)))) (* (sqrt 2) (neg (sqrt 2)))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
	39.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (neg (sqrt 2))) (* (sqrt 2) (neg (* a1 a1)))) (* (sqrt 2) (neg (sqrt 2)))) (.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
	34.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
	42.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
	38.5%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 (fma.f64 a2 (/.f64 #s(literal 1 binary64) (/.f64 a1 (/.f64 a2 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
	34.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 (fma.f64 a2 (.f64 (/.f64 #s(literal 1 binary64) (.f64 a1 a1)) a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
	29.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (* a1 a1) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (cos th))) (sqrt 2)) (.f64 (.f64 a1 a1) (/.f64 #s(approx (+ (* a2 (/ a2 (* a1 a1))) 1) (/.f64 (.f64 a2 a2) (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))))
✓	14.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 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	14.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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
	14.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
	14.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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
✓	99.6%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2)))))

Compiler

Compiled 2 677 to 827 computations (69.1% saved)

regimes260.0ms (2.2%)

Memory

2.3MiB live, 268.5MiB allocated

Counts

88 → 1

Calls

Call 1

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

Outputs
(.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))

Calls

8 calls:

54.0ms	a2
39.0ms	(cos.f64 th)
34.0ms	(*.f64 a2 a2)
28.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)))
27.0ms	a1

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)

regimes255.0ms (2.2%)

Memory

23.8MiB live, 342.0MiB allocated

Counts

83 → 1

Calls

Call 1

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

Outputs

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

Calls

8 calls:

58.0ms	a2
51.0ms	a1
26.0ms	(*.f64 a2 a2)
25.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
24.0ms	(cos.f64 th)

Results

Accuracy	Segments	Branch
99.6%	1	`a1`
99.6%	1	`a2`
99.6%	1	`th`
99.6%	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.6%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.6%	1	`(cos.f64 th)`
99.6%	1	`(*.f64 a1 a1)`
99.6%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes178.0ms (1.5%)

Memory

-6.7MiB live, 237.4MiB allocated

Counts

70 → 1

Calls

Call 1

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

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

Calls

8 calls:

28.0ms	a1
26.0ms	(*.f64 a2 a2)
22.0ms	th
21.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
20.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
99.4%	1	`a1`
99.4%	1	`a2`
99.4%	1	`th`
99.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)))`
99.4%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.4%	1	`(cos.f64 th)`
99.4%	1	`(*.f64 a1 a1)`
99.4%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes153.0ms (1.3%)

Memory

21.0MiB live, 332.6MiB allocated

Counts

65 → 1

Calls

Call 1

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

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

Calls

8 calls:

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

Results

Accuracy	Segments	Branch
99.4%	1	`a1`
99.4%	1	`a2`
99.4%	1	`th`
99.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)))`
99.4%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.4%	1	`(cos.f64 th)`
99.4%	1	`(*.f64 a1 a1)`
99.4%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes187.0ms (1.6%)

Memory

-23.5MiB live, 217.6MiB allocated

Counts

62 → 1

Calls

Call 1

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

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

Calls

8 calls:

57.0ms	(cos.f64 th)
25.0ms	th
18.0ms	a2
18.0ms	a1
16.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
99.3%	1	`a1`
99.3%	1	`a2`
99.3%	1	`th`
99.3%	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.3%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.3%	1	`(cos.f64 th)`
99.3%	1	`(*.f64 a1 a1)`
99.3%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes145.0ms (1.2%)

Memory

-1.2MiB live, 270.0MiB allocated

Counts

61 → 2

Calls

Call 1

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

Outputs

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

Calls

8 calls:

20.0ms	th
19.0ms	a2
18.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)))
18.0ms	(*.f64 a2 a2)
17.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
68.1%	1	`a1`
68.1%	1	`a2`
68.1%	1	`th`
77.0%	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)))`
76.2%	2	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
76.2%	2	`(cos.f64 th)`
68.1%	1	`(*.f64 a1 a1)`
68.1%	1	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes8.0ms (0.1%)

Memory

15.0MiB live, 15.0MiB allocated

Counts

24 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

7.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
77.0%	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)

regimes54.0ms (0.5%)

Memory

20.0MiB live, 59.2MiB allocated

Counts

14 → 1

Calls

Call 1

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

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

Calls

8 calls:

22.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
5.0ms	a2
5.0ms	a1
5.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)))

Results

Accuracy	Segments	Branch
68.1%	1	`th`
68.1%	1	`a2`
68.1%	1	`(*.f64 a2 a2)`
68.1%	1	`a1`
68.1%	1	`(*.f64 a1 a1)`
68.1%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
68.1%	1	`(cos.f64 th)`
68.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)))`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes47.0ms (0.4%)

Memory

-8.6MiB live, 35.5MiB allocated

Counts

8 → 1

Calls

Call 1

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

Outputs

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

Calls

8 calls:

25.0ms	(*.f64 a1 a1)
3.0ms	a1
3.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)))
3.0ms	a2
3.0ms	th

Results

Accuracy	Segments	Branch
68.1%	1	`th`
68.1%	1	`a2`
68.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)))`
68.1%	1	`(*.f64 a2 a2)`
68.1%	1	`a1`
68.1%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
68.1%	1	`(cos.f64 th)`
68.1%	1	`(*.f64 a1 a1)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes15.0ms (0.1%)

Memory

-11.3MiB live, 27.0MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

2 → 1

Calls

Call 1

Inputs

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

Outputs

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

Calls

8 calls:

3.0ms	(cos.f64 th)
2.0ms	a2
2.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
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	th

Results

Accuracy	Segments	Branch
14.8%	1	`th`
14.8%	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.8%	1	`a1`
14.8%	1	`a2`
14.8%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
14.8%	1	`(cos.f64 th)`
14.8%	1	`(*.f64 a2 a2)`
14.8%	1	`(*.f64 a1 a1)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

bsearch1.0ms (0%)

Memory

1.7MiB live, 1.7MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-7.846161133861489e-138	-7.096099306869292e-196

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.6MiB live, 0.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-7.846161133861489e-138	-7.096099306869292e-196

Compiler

Compiled 25 to 18 computations (28% saved)

simplify11.0ms (0.1%)

Memory

-17.9MiB live, 19.9MiB allocated

Algorithm

1×	egg-herbie

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	91	455
1	125	455

Stop Event

1×

saturated

Calls

Call 1

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

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

soundness1.3s (11.2%)

Memory

54.2MiB live, 1 033.9MiB allocated

Rules

34 694×	`lower-fma.f64`
34 694×	`lower-fma.f32`
12 570×	`lower-fma.f64`
12 570×	`lower-fma.f32`
12 432×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	48	363
0	82	298
1	301	273
2	2293	269
0	8412	267
0	62	437
0	97	402
1	325	354
2	2636	343
0	9166	340
0	111	1498
1	343	1366
2	1205	1262
3	3898	1233
0	8422	1172
0	551	9109
1	1898	8301
2	7368	8293
0	8561	7844
0	445	9556
1	1575	8919
2	6169	8665
0	8076	8232
0	12	44
0	20	38
1	58	38
2	411	38
3	7331	38
0	8434	37

Stop Event

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

Compiler

Compiled 645 to 333 computations (48.4% saved)

preprocess201.0ms (1.7%)

Memory

-39.6MiB live, 377.3MiB allocated

Remove

(abs a2)

(abs th)

Compiler

Compiled 2 670 to 1 476 computations (44.7% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

analyze0.0ms (0%)

sample1.1s (9.4%)

preprocess137.0ms (1.2%)

explain264.0ms (2.2%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify7.0ms (0.1%)

localize65.0ms (0.6%)

series16.0ms (0.1%)

simplify771.0ms (6.5%)

rewrite531.0ms (4.5%)

eval116.0ms (1%)

prune98.0ms (0.8%)

simplify475.0ms (4%)

localize235.0ms (2%)

series85.0ms (0.7%)

simplify352.0ms (3%)

rewrite347.0ms (2.9%)

eval240.0ms (2%)

prune218.0ms (1.9%)

simplify263.0ms (2.2%)

localize319.0ms (2.7%)

series71.0ms (0.6%)

simplify476.0ms (4%)

rewrite505.0ms (4.3%)

eval349.0ms (3%)

prune369.0ms (3.1%)

simplify221.0ms (1.9%)

localize159.0ms (1.4%)

series43.0ms (0.4%)

simplify345.0ms (2.9%)

rewrite340.0ms (2.9%)

eval158.0ms (1.3%)

prune263.0ms (2.2%)

regimes260.0ms (2.2%)

regimes255.0ms (2.2%)

regimes178.0ms (1.5%)

regimes153.0ms (1.3%)

regimes187.0ms (1.6%)

regimes145.0ms (1.2%)

regimes8.0ms (0.1%)

regimes54.0ms (0.5%)

regimes47.0ms (0.4%)

regimes15.0ms (0.1%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

simplify11.0ms (0.1%)

soundness1.3s (11.2%)

preprocess201.0ms (1.7%)

end0.0ms (0%)

Profiling