Metrics for Migdal et al, Equation (64)

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze0.0ms (0%)

Memory

1.0MiB live, 0.9MiB allocated

Algorithm

1×

Search

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

Compiler

Compiled 21 to 14 computations (33.3% saved)

sample1.4s (12.4%)

Memory

25.7MiB live, 1 571.7MiB allocated

Samples

1.0s

8 256×

valid

Precisions

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

ival-mult: 337.0ms (45.3% of total)

ival-cos: 219.0ms (29.4% of total)

ival-sqrt: 79.0ms (10.6% of total)

ival-div: 48.0ms (6.4% of total)

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

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

exact: 6.0ms (0.8% of total)

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

Bogosity

explain230.0ms (2.1%)

Memory

-32.5MiB live, 208.5MiB 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

65.0ms

512×

valid

Compiler

Compiled 138 to 40 computations (71% saved)

Precisions

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

ival-mult: 26.0ms (55.5% of total)

ival-cos: 11.0ms (23.5% of total)

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

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

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

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

exact: 0.0ms (0% of total)

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

preprocess135.0ms (1.2%)

Memory

22.4MiB live, 60.9MiB allocated

Algorithm

1×	egg-herbie

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Calls

Call 1

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

Outputs

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

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

Symmetry

(abs th)

(abs a2)

(abs a1)

(sort a1 a2)

Compiler

Compiled 22 to 12 computations (45.5% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated

Alt Table

Click to see full alt table

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

Compiler

Compiled 22 to 12 computations (45.5% saved)

simplify7.0ms (0.1%)

Memory

10.7MiB live, 10.7MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

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

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

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

localize96.0ms (0.9%)

Memory

-5.7MiB live, 71.3MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0	(cos.f64 th)
accuracy	0.1875	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
accuracy	0.20541000976844204	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
accuracy	0.740566259768442	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

Samples

84.0ms

256×

valid

Compiler

Compiled 58 to 14 computations (75.9% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

series44.0ms (0.4%)

Memory

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

simplify737.0ms (6.7%)

Memory

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

rewrite310.0ms (2.8%)

Memory

-17.7MiB live, 567.7MiB allocated

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Counts

5 → 327

Calls

Call 1

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

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

eval60.0ms (0.5%)

Memory: 15.7MiB live, 129.2MiB allocated
Compiler: Compiled 14 708 to 1 018 computations (93.1% saved)

prune91.0ms (0.8%)

Memory

18.6MiB live, 210.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%	(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
	99.5%	(/.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.9%	(/.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))))
▶	25.1%	(/.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)))
	25.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.6%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))))
	99.6%	(/.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.6%	(/.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)))))
	38.2%	(+.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))
	99.5%	(.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))))
	49.4%	(.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)))))
▶	67.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))))
▶	46.8%	#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 916 to 518 computations (43.4% saved)

simplify246.0ms (2.2%)

Memory

-14.2MiB live, 442.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(cos.f64 th)
cost-diff	0	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
cost-diff	0	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
cost-diff	2432	(/.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)))
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

7 644×	`lower-fma.f32`
7 636×	`lower-fma.f64`
4 898×	`lower-+.f32`
4 896×	`lower-+.f64`
4 506×	`lower-*.f32`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	42	374
0	69	338
1	134	334
2	363	326
3	1713	326
4	6307	314
0	8970	314

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

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

localize122.0ms (1.1%)

Memory

-20.1MiB live, 176.6MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.078125	(.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))))
accuracy	0.11166000976844201	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
accuracy	0.7405662597684419	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
accuracy	43.49690337521566	(/.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)))
accuracy	0.185878759768442	(/.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	3.6265086481426976	(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
accuracy	6.592020753498383	(/.f64 a2 (*.f64 a1 a1))
accuracy	27.233569466818643	(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th)))
accuracy	0	(cos.f64 th)
accuracy	0.00390625	(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy	0.18359375	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0.7405662597684419	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.00390625	(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0.248378759768442	(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.37109375	(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy	20.932555313510004	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
accuracy	0.05859375	(.f64 (cos.f64 th) (.f64 a1 a1))
accuracy	0.08203125	(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	0.1875	(.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.20769501953688405	(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))

Samples

74.0ms

256×

valid

Compiler

Compiled 357 to 40 computations (88.8% saved)

Precisions

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

ival-mult: 25.0ms (48.8% of total)

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

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

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

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

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

22.5MiB live, 142.4MiB allocated

Counts

24 → 576

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 (/.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))) (patch (/.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))) #<representation binary64>) () ())
#s(alt (.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)))) (patch (.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)))) #<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 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (patch (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #<representation binary64>) () ())

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

Calls

144 calls:

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

simplify260.0ms (2.4%)

Memory

-5.6MiB live, 429.8MiB allocated

Algorithm

1×	egg-herbie

Rules

9 230×	`lower-fma.f64`
9 230×	`lower-fma.f32`
4 946×	`lower-*.f64`
4 946×	`lower-*.f32`
2 264×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	527	8486
1	1871	7874
2	7362	7812
0	8131	7357

Stop Event

1×	iter limit
1×	node limit

Counts

576 → 576

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

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

rewrite329.0ms (3%)

Memory

-22.0MiB live, 588.7MiB allocated

Rules

4 956×	`lower-/.f32`
4 944×	`lower-/.f64`
4 170×	`lower-*.f32`
4 146×	`lower-*.f64`
2 974×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	42	292
0	69	262
1	246	244
2	2055	240
0	8099	238

Stop Event

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

Counts

24 → 1 060

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

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

eval232.0ms (2.1%)

Memory: 35.4MiB live, 538.9MiB allocated
Compiler: Compiled 51 287 to 3 031 computations (94.1% saved)

prune316.0ms (2.9%)

Memory

2.8MiB live, 403.1MiB allocated

Pruning

20 alts after pruning (20 fresh and 0 done)

	Pruned	Kept	Total
New	1 907	18	1 925
Fresh	12	2	14
Picked	5	0	5
Done	0	0	0
Total	1 924	20	1 944

Accuracy

100.0%

Counts

1 944 → 20

Alt Table

Click to see full alt table

Status	Accuracy	Program
	13.2%	(/.f64 (.f64 #s(approx (/ (cos th) (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))))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
	14.2%	(/.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2)))) (/.f64 (.f64 (+.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
	99.6%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 th) (fma.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 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
	67.1%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
	61.0%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(approx (/ (cos th) (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))))))
	99.6%	(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
	67.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 (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
	99.3%	#s(approx (/ (* (/ (cos th) (sqrt 2)) (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2)))) (* (+ a1 a2) (- a1 a2))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
	67.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	67.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a2 (neg.f64 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)))))
▶	61.9%	#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))))
▶	31.9%	#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)) #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #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))))))
	66.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 (*.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)))))
	34.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) (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)))))))
▶	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 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/2 binary64))))
	99.2%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))

Compiler

Compiled 788 to 466 computations (40.9% saved)

simplify358.0ms (3.2%)

Memory

-1.9MiB live, 288.7MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

6 410×	`lower-fma.f32`
6 402×	`lower-fma.f64`
5 904×	`lower-*.f32`
5 882×	`lower-*.f64`
2 388×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	54	467
0	87	447
1	157	421
2	316	415
3	752	415
4	1668	399
5	2771	393
6	3765	393
7	4401	393
8	6038	393
9	6335	393
10	6554	393
11	6693	393
12	7410	393
13	7705	393
0	8029	390

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

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

localize236.0ms (2.1%)

Memory

6.6MiB live, 164.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.46484375	(*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
accuracy	7.556399648191718	(/.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)))
accuracy	8.61358475174043	(fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
accuracy	20.932555313510004	#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))))
accuracy	3.6265086481426976	(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
accuracy	6.592020753498383	(/.f64 a2 (*.f64 a1 a1))
accuracy	27.233569466818643	(.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (/.f64 a2 (.f64 a1 a1)) #s(literal 1 binary64)) #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
accuracy	31.871242027509492	#s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)))
accuracy	0.00390625	(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy	0.18359375	(.f64 (fma.f64 a1 a1 (.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))))
accuracy	0.740566259768442	(/.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)))
accuracy	31.871242027509492	#s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)))
accuracy	0	(sqrt.f64 #s(literal 2 binary64))
accuracy	0.22494125976844204	(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
accuracy	20.932555313510004	#s(approx (+ (* (/ (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	54.03714271014671	#s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
accuracy	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 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/2 binary64))))
accuracy	0.00390625	(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy	0.1875	(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal 1/2 binary64)))
accuracy	0.193691259768442	(*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))

Samples

119.0ms

256×

valid

Compiler

Compiled 343 to 48 computations (86% saved)

Precisions

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

ival-mult: 51.0ms (53% of total)

ival-cos: 24.0ms (24.9% of total)

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

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

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

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

exact: 0.0ms (0% of total)

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

series69.0ms (0.6%)

Memory

-6.0MiB live, 30.4MiB allocated

Counts

23 → 528

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

Calls

132 calls:

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

simplify560.0ms (5.1%)

Memory

-5.8MiB live, 305.4MiB allocated

Algorithm

1×	egg-herbie

Rules

15 912×	`lower-fma.f64`
15 912×	`lower-fma.f32`
6 944×	`lower-*.f64`
6 944×	`lower-*.f32`
5 442×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	264	7948
1	918	7220
2	3675	6754
0	8129	6343

Stop Event

1×	iter limit
1×	node limit

Counts

528 → 528

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

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

rewrite470.0ms (4.2%)

Memory

22.0MiB live, 493.7MiB allocated

Rules

6 000×	`lower-*.f32`
5 978×	`lower-*.f64`
4 524×	`lower-/.f32`
4 512×	`lower-/.f64`
4 452×	`lower-fma.f32`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	54	363
0	87	342
1	291	311
2	2236	301
0	8791	301

Stop Event

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

Counts

23 → 578

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

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

eval220.0ms (2%)

Memory: -14.5MiB live, 236.5MiB allocated
Compiler: Compiled 30 631 to 2 070 computations (93.2% saved)

prune328.0ms (3%)

Memory

-21.4MiB live, 299.8MiB allocated

Pruning

32 alts after pruning (31 fresh and 1 done)

	Pruned	Kept	Total
New	1 268	21	1 289
Fresh	5	10	15
Picked	4	1	5
Done	0	0	0
Total	1 277	32	1 309

Accuracy

100.0%

Counts

1 309 → 32

Alt Table

Click to see full alt table

Status	Accuracy	Program
	61.0%	(/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
▶	13.1%	(/.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.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)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))))
	13.2%	(/.f64 (.f64 #s(approx (/ (cos th) (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))))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
	14.2%	(/.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2)))) (/.f64 (.f64 (+.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
	99.6%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))
	67.1%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
	61.0%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)))))
	61.0%	(.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
	67.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 (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
	60.7%	(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (.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))))
▶	14.4%	(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a1 a1)) (/.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))))
	99.3%	#s(approx (/ (* (/ (cos th) (sqrt 2)) (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2)))) (* (+ a1 a2) (- a1 a2))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
	67.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	67.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a2 (neg.f64 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)))))
	61.8%	#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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))))
	61.9%	#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 #s(literal 2 binary64) a1)))
	61.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (/.f64 (fma.f64 a2 (.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) a1)))
	35.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (.f64 (/.f64 a2 a1) (/.f64 #s(literal 1 binary64) a1)) #s(literal 1 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))))
	27.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a1 a1) (.f64 #s(approx (+ ( a2 (/ a2 (* a1 a1))) 1) (/.f64 (.f64 a2 a2) (.f64 a1 a1))) #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
	14.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a1 a1) (.f64 #s(approx (+ ( a2 (/ a2 (* a1 a1))) 1) #s(literal 1 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))))
	61.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* (* a2 a2) (/ (sqrt 2) a1)) (* (sqrt 2) a1)) (/.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
	66.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (/ (sqrt 2) a1)) (* (sqrt 2) a1)) (* (sqrt 2) (/ (sqrt 2) a1))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
▶	34.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (/ (sqrt 2) a1)) (* (sqrt 2) a1)) (* (sqrt 2) (/ (sqrt 2) a1))) (.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)))
	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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
▶	99.7%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
	99.2%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
	99.3%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))))

Compiler

Compiled 1 255 to 749 computations (40.3% saved)

simplify222.0ms (2%)

Memory

6.2MiB live, 329.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

3 938×	`lower-fma.f32`
3 930×	`lower-fma.f64`
3 894×	`lower-*.f32`
3 864×	`lower-*.f64`
2 332×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	69	546
0	111	528
1	219	514
2	564	484
3	2674	478
4	4081	454
5	6001	454
0	8173	452

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

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

localize179.0ms (1.6%)

Memory

-0.5MiB live, 388.9MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.20703125	(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))))
accuracy	0.28515625	(/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
accuracy	31.871242027509506	#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
accuracy	43.55159087521566	(/.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.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)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))))
accuracy	3.6228309490288915	(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))))
accuracy	6.615908316966198	(/.f64 a2 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
accuracy	20.932555313510004	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (/ (sqrt 2) a1)) (* (sqrt 2) a1)) (* (sqrt 2) (/ (sqrt 2) a1))) (.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)))))))
accuracy	26.53812843781451	(.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)))))
accuracy	0.18359375	(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a1 a1)) (/.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))))
accuracy	0.740566259768442	(/.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)))
accuracy	31.871242027509506	#s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)))
accuracy	54.03885711170498	#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1))
accuracy	0.10546875	(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
accuracy	0.37109375	(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy	20.932555313510004	#s(approx (+ (* (/ (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)))
accuracy	54.03714271014671	#s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
accuracy	0	(cos.f64 th)
accuracy	0	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
accuracy	0.08203125	(.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
accuracy	0.19140625	(.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))

Samples

110.0ms

256×

valid

Compiler

Compiled 400 to 61 computations (84.8% saved)

Precisions

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

ival-mult: 44.0ms (54.6% of total)

ival-div: 14.0ms (17.4% of total)

ival-add: 12.0ms (14.9% of total)

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

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

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

exact: 1.0ms (1.2% of total)

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

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

series46.0ms (0.4%)

Memory

18.5MiB live, 95.2MiB allocated

Counts

26 → 612

Calls

Call 1

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

Calls

153 calls:

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

simplify287.0ms (2.6%)

Memory

7.0MiB live, 483.1MiB allocated

Algorithm

1×	egg-herbie

Rules

8 840×	`lower-fma.f64`
8 840×	`lower-fma.f32`
6 064×	`lower-*.f64`
6 064×	`lower-*.f32`
2 326×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	456	8812
1	1607	8191
2	6250	8057
0	8131	7611

Stop Event

1×	iter limit
1×	node limit

Counts

612 → 612

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

rewrite342.0ms (3.1%)

Memory

16.1MiB live, 533.1MiB allocated

Rules

5 686×	`lower-*.f32`
5 656×	`lower-*.f64`
4 840×	`lower-/.f32`
4 828×	`lower-/.f64`
4 590×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	69	454
0	111	434
1	404	389
2	3151	381
0	9449	376

Stop Event

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

Counts

26 → 553

Calls

Call 1

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

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

eval144.0ms (1.3%)

Memory: 26.1MiB live, 247.3MiB allocated
Compiler: Compiled 34 032 to 2 138 computations (93.7% saved)

prune253.0ms (2.3%)

Memory

-37.8MiB live, 449.9MiB allocated

Pruning

39 alts after pruning (35 fresh and 4 done)

	Pruned	Kept	Total
New	1 275	15	1 290
Fresh	6	20	26
Picked	2	3	5
Done	0	1	1
Total	1 283	39	1 322

Accuracy

100.0%

Counts

1 322 → 39

Alt Table

Click to see full alt table

Status	Accuracy	Program
	61.0%	(/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
	19.7%	(/.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (.f64 (/.f64 (.f64 (-.f64 a1 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 a2 a1)))
	14.2%	(/.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) #s(approx (/ (sqrt 2) (cos th)) (sqrt.f64 #s(literal 2 binary64)))))
	13.1%	(/.f64 (.f64 (.f64 #s(approx (+ (* a2 a2) (* 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)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))))
	13.2%	(/.f64 (.f64 #s(approx (/ (cos th) (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))))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
	14.4%	(/.f64 (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a1 a1)) #s(approx (cos th) (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
	14.2%	(/.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2)))) (/.f64 (.f64 (+.f64 a1 a2) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
	14.4%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a1 a1)) #s(approx (cos th) (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))))))
	99.6%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))
	67.1%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
	61.0%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64)))))
	61.0%	(.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) #s(approx (cos th) (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))))
	67.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 (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
	60.7%	(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (.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))))
	14.0%	(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a1 a1)) (/.f64 #s(approx (cos th) (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))) (sqrt.f64 #s(literal 2 binary64))))
✓	14.4%	(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a1 a1)) (/.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))))
	14.8%	(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
	99.3%	#s(approx (/ (* (/ (cos th) (sqrt 2)) (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2)))) (* (+ a1 a2) (- a1 a2))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
	67.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	67.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a2 (neg.f64 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)))))
	61.8%	#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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))))
	61.9%	#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 #s(literal 2 binary64) a1)))
	61.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (/.f64 (fma.f64 a2 (.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) a1)))
	35.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a1 a1) (.f64 (fma.f64 a2 (.f64 (/.f64 a2 a1) (/.f64 #s(literal 1 binary64) a1)) #s(literal 1 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))))
	31.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (/ (sqrt 2) a1)) (* (sqrt 2) a1)) (* (sqrt 2) (/ (sqrt 2) a1))) (fma.f64 (.f64 (.f64 a1 a1) (/.f64 a2 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
	39.3%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (/ (sqrt 2) a1)) (* (sqrt 2) a1)) (* (sqrt 2) (/ (sqrt 2) a1))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (.f64 a2 a2))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
	39.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (/ (sqrt 2) a1)) (* (sqrt 2) a1)) (* (sqrt 2) (/ (sqrt 2) a1))) (/.f64 (fma.f64 (.f64 a1 (.f64 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 a1))) (.f64 #s(literal 2 binary64) (*.f64 a1 a1)))))
	66.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (/ (sqrt 2) a1)) (* (sqrt 2) a1)) (* (sqrt 2) (/ (sqrt 2) a1))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
	29.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (/ (sqrt 2) a1)) (* (sqrt 2) a1)) (* (sqrt 2) (/ (sqrt 2) a1))) (.f64 (.f64 a1 a1) #s(approx (+ (* a2 (/ a2 (* a1 (* a1 (sqrt 2))))) (/ 1 (sqrt 2))) (/.f64 (.f64 a2 a2) (.f64 a1 (*.f64 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)))
	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 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
✓	99.7%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
	99.3%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 (.f64 #s(literal 1/2 binary64) #s(approx (+ ( a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
	99.2%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
	99.3%	#s(approx (* (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) 1/2) (.f64 (.f64 a2 a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (cos.f64 th)))))

Compiler

Compiled 2 226 to 715 computations (67.9% saved)

regimes161.0ms (1.5%)

Memory

2.6MiB live, 246.4MiB allocated

Counts

74 → 1

Calls

Call 1

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

Outputs

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

Calls

8 calls:

23.0ms	a1
21.0ms	(cos.f64 th)
20.0ms	th
20.0ms	a2
20.0ms	(*.f64 a2 a2)

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes127.0ms (1.1%)

Memory

5.3MiB live, 158.7MiB allocated

Counts

55 → 1

Calls

Call 1

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

Calls

8 calls:

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

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)

regimes123.0ms (1.1%)

Memory

33.8MiB live, 145.5MiB allocated

Counts

54 → 1

Calls

Call 1

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

Calls

8 calls:

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

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)

regimes122.0ms (1.1%)

Memory

-3.6MiB live, 198.1MiB allocated

Counts

52 → 1

Calls

Call 1

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

Outputs

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

Calls

8 calls:

16.0ms	a2
16.0ms	(cos.f64 th)
15.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)))
15.0ms	th
14.0ms	a1

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)

regimes123.0ms (1.1%)

Memory

-25.1MiB live, 170.4MiB allocated

Counts

50 → 1

Calls

Call 1

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

Outputs

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

Calls

8 calls:

24.0ms	a2
17.0ms	a1
15.0ms	(*.f64 a2 a2)
14.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
13.0ms	th

Results

Accuracy	Segments	Branch
99.3%	1	`a1`
99.3%	1	`a2`
99.3%	1	`th`
99.3%	1	`(*.f64 a2 a2)`
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)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes118.0ms (1.1%)

Memory

9.0MiB live, 167.1MiB allocated

Counts

48 → 2

Calls

Call 1

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

Outputs

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

Calls

8 calls:

17.0ms	(*.f64 a2 a2)
17.0ms	a2
16.0ms	(cos.f64 th)
16.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)))
13.0ms	th

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes7.0ms (0.1%)

Memory

12.4MiB live, 12.4MiB allocated

Counts

19 → 2

Calls

Call 1

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

Outputs

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

Calls

1 calls:

5.0ms

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

Results

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

Compiler

Compiled 22 to 12 computations (45.5% saved)

regimes16.0ms (0.1%)

Memory

-14.6MiB live, 23.2MiB allocated

Counts

12 → 2

Calls

Call 1

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

Outputs

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

Calls

3 calls:

8.0ms

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

4.0ms

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

4.0ms

(cos.f64 th)

Results

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

Compiler

Compiled 35 to 23 computations (34.3% saved)

regimes34.0ms (0.3%)

Memory

18.4MiB live, 56.3MiB allocated

Counts

11 → 1

Calls

Call 1

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

Calls

8 calls:

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

Results

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

regimes32.0ms (0.3%)

Memory

10.7MiB live, 55.0MiB allocated

Counts

10 → 1

Calls

Call 1

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

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:

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

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes24.0ms (0.2%)

Memory

-34.0MiB live, 44.4MiB allocated

Counts

7 → 1

Calls

Call 1

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

Outputs

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

Calls

8 calls:

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

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes12.0ms (0.1%)

Memory

27.9MiB live, 27.9MiB 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 (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))

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

Outputs

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

Calls

8 calls:

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

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

bsearch1.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-2.820560157010832e-102	-2.1345547957945228e-191

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-2.820560157010832e-102	-2.1345547957945228e-191

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-2.820560157010832e-102	-2.1345547957945228e-191

Compiler

Compiled 25 to 18 computations (28% saved)

simplify10.0ms (0.1%)

Memory

-22.4MiB live, 16.9MiB allocated

Algorithm

1×	egg-herbie

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	92	508
1	119	508

Stop Event

1×

saturated

Calls

Call 1

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

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

soundness1.7s (15%)

Memory

11.1MiB live, 1 179.8MiB allocated

Rules

34 694×	`lower-fma.f64`
34 694×	`lower-fma.f32`
15 912×	`lower-fma.f64`
15 912×	`lower-fma.f32`
9 230×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	54	363
0	87	342
1	291	311
2	2236	301
0	8791	301
0	456	8812
1	1607	8191
2	6250	8057
0	8131	7611
0	12	44
0	20	38
1	58	38
2	411	38
3	7331	38
0	8434	37
0	111	1498
1	343	1366
2	1205	1262
3	3898	1233
0	8422	1172
0	527	8486
1	1871	7874
2	7362	7812
0	8131	7357
0	264	7948
1	918	7220
2	3675	6754
0	8129	6343

Stop Event

1×	fuel
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
1×	node limit
1×	iter limit

Compiler

Compiled 951 to 456 computations (52.1% saved)

preprocess120.0ms (1.1%)

Memory

-7.5MiB live, 262.3MiB allocated

Remove

(abs a1)

(abs a2)

(abs th)

Compiler

Compiled 1 456 to 724 computations (50.3% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze0.0ms (0%)

sample1.4s (12.4%)

explain230.0ms (2.1%)

preprocess135.0ms (1.2%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify7.0ms (0.1%)

localize96.0ms (0.9%)

series44.0ms (0.4%)

simplify737.0ms (6.7%)

rewrite310.0ms (2.8%)

eval60.0ms (0.5%)

prune91.0ms (0.8%)

simplify246.0ms (2.2%)

localize122.0ms (1.1%)

series71.0ms (0.6%)

simplify260.0ms (2.4%)

rewrite329.0ms (3%)

eval232.0ms (2.1%)

prune316.0ms (2.9%)

simplify358.0ms (3.2%)

localize236.0ms (2.1%)

series69.0ms (0.6%)

simplify560.0ms (5.1%)

rewrite470.0ms (4.2%)

eval220.0ms (2%)

prune328.0ms (3%)

simplify222.0ms (2%)

localize179.0ms (1.6%)

series46.0ms (0.4%)

simplify287.0ms (2.6%)

rewrite342.0ms (3.1%)

eval144.0ms (1.3%)

prune253.0ms (2.3%)

regimes161.0ms (1.5%)

regimes127.0ms (1.1%)

regimes123.0ms (1.1%)

regimes122.0ms (1.1%)

regimes123.0ms (1.1%)

regimes118.0ms (1.1%)

regimes7.0ms (0.1%)

regimes16.0ms (0.1%)

regimes34.0ms (0.3%)

regimes32.0ms (0.3%)

regimes24.0ms (0.2%)

regimes12.0ms (0.1%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

simplify10.0ms (0.1%)

soundness1.7s (15%)

preprocess120.0ms (1.1%)

end0.0ms (0%)

Profiling