Metrics for Migdal et al, Equation (64)

start0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

analyze0.0ms (0%)

Memory

0.5MiB live, 0.5MiB 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.2s (9.2%)

Memory

-7.2MiB live, 1 634.8MiB allocated

Samples

935.0ms

8 256×

valid

Precisions

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

ival-cos: 230.0ms (33.3% of total)

ival-mult: 228.0ms (33% of total)

ival-sqrt: 127.0ms (18.4% of total)

ival-div: 56.0ms (8.1% of total)

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

exact: 6.0ms (0.9% of total)

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

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

Bogosity

explain184.0ms (1.4%)

Memory

-8.2MiB live, 264.5MiB allocated

FPErrors

Click to see full error table

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

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`*.f64`	`(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))`	*no**	1	0

Confusion

	Predicted +	Predicted -
+	1	0
-	0	255

Precision

1.0

Recall

1.0

Confusion?

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

Precision?

1.0

Recall?

1.0

Freqs

test

number	freq
0	255
1	1

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

65.0ms

512×

valid

Compiler

Compiled 138 to 40 computations (71% saved)

Precisions

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

ival-mult: 20.0ms (43.1% of total)

ival-cos: 16.0ms (34.5% of total)

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

ival-sqrt: 3.0ms (6.5% 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)

preprocess141.0ms (1%)

Memory

3.3MiB live, 64.2MiB 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.6MiB live, 1.6MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.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)

simplify6.0ms (0%)

Memory

9.0MiB live, 9.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

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

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

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

localize61.0ms (0.5%)

Memory

-31.8MiB live, 57.8MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.01171875	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
accuracy	0.21875	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
accuracy	0.3332077357793569	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
accuracy	0.709316259768442	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))

Samples

27.0ms

256×

valid

Compiler

Compiled 58 to 14 computations (75.9% saved)

Precisions

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

ival-cos: 8.0ms (45.3% of total)

ival-mult: 5.0ms (28.3% of total)

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

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

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

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

exact: 0.0ms (0% of total)

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

series16.0ms (0.1%)

Memory

35.7MiB live, 35.7MiB allocated

Counts

5 → 108

Calls

Call 1

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

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

Calls

27 calls:

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

simplify428.0ms (3.2%)

Memory

21.5MiB live, 709.8MiB allocated

Algorithm

1×	egg-herbie

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

1×	iter limit
1×	node limit

Counts

108 → 108

Calls

Call 1

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

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

rewrite283.0ms (2.1%)

Memory

-25.0MiB live, 475.5MiB allocated

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Counts

5 → 327

Calls

Call 1

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

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

eval52.0ms (0.4%)

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

prune78.0ms (0.6%)

Memory

30.2MiB live, 177.3MiB allocated

Pruning

21 alts after pruning (21 fresh and 0 done)

	Pruned	Kept	Total
New	469	21	490
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	470	21	491

Accuracy

100.0%

Counts

491 → 21

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.6%	(fma.f64 (/.f64 (.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
▶	99.6%	(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))))))
	99.3%	(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
	16.4%	(/.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))))
	16.4%	(/.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))))
	24.4%	(/.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))))
	24.4%	(/.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)))
▶	24.4%	(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	99.3%	(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
	99.0%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))))
	99.4%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (.f64 a2 a2)))
	36.8%	(+.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.1%	(.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.2%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
	99.3%	(.f64 (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
	24.4%	(.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)))
▶	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
	98.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))))
	52.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 a2 (.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
	64.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
	61.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.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))))

Compiler

Compiled 1 136 to 624 computations (45.1% saved)

simplify345.0ms (2.6%)

Memory

-49.0MiB live, 265.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

7 098×	`lower-fma.f32`
7 090×	`lower-fma.f64`
4 284×	`lower-+.f32`
4 282×	`lower-+.f64`
4 254×	`lower-*.f32`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	41	322
0	68	311
1	127	289
2	339	281
3	1631	281
4	5984	281
0	8475	281

Stop Event

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

Calls

Call 1

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

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

localize184.0ms (1.4%)

Memory

7.7MiB live, 154.5MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.17578125	(.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.2068219343245562	(.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))
accuracy	0.23828125	(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))
accuracy	0.2925513369134186	(fma.f64 (cos.f64 th) (.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.02734375	(.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))
accuracy	0.11328125	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
accuracy	0.171875	(.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
accuracy	43.43381955037189	(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (.f64 (.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0	(cos.f64 th)
accuracy	0.0078125	(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy	0.3410202357793569	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0.709316259768442	(/.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.21322250976844204	(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.44140625	(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy	21.265777932698214	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 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.1328125	(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
accuracy	0.13671875	(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))))))
accuracy	0.4140625	(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.44140625	(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))

Samples

138.0ms

256×

valid

Compiler

Compiled 321 to 39 computations (87.9% saved)

Precisions

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

ival-cos: 45.0ms (53.4% of total)

ival-mult: 23.0ms (27.3% of total)

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

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

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

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

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

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

exact: 0.0ms (0% of total)

series53.0ms (0.4%)

Memory

-23.3MiB live, 65.1MiB allocated

Counts

22 → 492

Calls

Call 1

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

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

Calls

123 calls:

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

simplify231.0ms (1.7%)

Memory

42.9MiB live, 232.2MiB allocated

Algorithm

1×	egg-herbie

Rules

8 624×	`lower-fma.f64`
8 624×	`lower-fma.f32`
4 890×	`lower-*.f64`
4 890×	`lower-*.f32`
2 252×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	509	6983
1	1800	6373
2	6991	6304
0	8183	5953

Stop Event

1×	iter limit
1×	node limit

Counts

492 → 491

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

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

rewrite428.0ms (3.2%)

Memory

11.8MiB live, 383.2MiB allocated

Rules

4 474×	`lower-/.f32`
4 464×	`lower-/.f64`
4 408×	`lower-*.f32`
4 380×	`lower-*.f64`
4 094×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	41	238
0	68	227
1	233	191
2	2087	191
0	8086	189

Stop Event

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

Counts

22 → 1 834

Calls

Call 1

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

Outputs
(+.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a2 (.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))))
(exp.f64 (.f64 (log.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.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) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (/.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2)) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2) (/.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 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 (.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) 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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2 (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (.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)))))
(neg.f64 (/.f64 (neg.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 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.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)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (.f64 a1 a1) (.f64 a2 (.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (.f64 a2 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 (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 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 (.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 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (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 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (neg.f64 (cos.f64 th))) (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)) (cos.f64 th)))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (.f64 (.f64 (cos.f64 th) (.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 (.f64 a2 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 (neg.f64 (cos.f64 th)) (fma.f64 a2 a2 (.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (+.f64 a2 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(/.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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)) (.f64 a2 a2)) (.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #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 (cos.f64 th) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (cos.f64 th) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 a2) (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (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)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (cos.f64 th) a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 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 (cos.f64 th) (.f64 a1 a1))) (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (.f64 (cos.f64 th) 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)) 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 (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 a2) (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (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 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (.f64 a2 (.f64 (cos.f64 th) a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) #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 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) (neg.f64 (.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) 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 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 a2) (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.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 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #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 (cos.f64 th) (.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (neg.f64 (*.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 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.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 (cos.f64 th) (neg.f64 (*.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 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (neg.f64 (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) #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 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) (neg.f64 (.f64 a2 a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 a2) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (neg.f64 (*.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 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.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 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (.f64 (cos.f64 th) (.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 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) 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 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (cos.f64 th)) (.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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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) (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 (.f64 (cos.f64 th) a1) (neg.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.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 (.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2))) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 (.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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.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)) (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)) (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 (.f64 (cos.f64 th) a1) (neg.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.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 (.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 #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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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)) (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 (.f64 (cos.f64 th) a1) (neg.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.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 (.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 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #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 (cos.f64 th) (.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 (.f64 (cos.f64 th) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (cos.f64 th)) (.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 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (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 (cos.f64 th) (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) 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)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 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)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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))) (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 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (.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 (.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 (neg.f64 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (neg.f64 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 a2) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (neg.f64 a2) (.f64 (cos.f64 th) 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 (neg.f64 a2) (.f64 (cos.f64 th) 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 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 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)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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)) (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 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (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 (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 (-.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (.f64 (cos.f64 th) (/.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 #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 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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) (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 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))))) (.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)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 (cos.f64 th) (/.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 (cos.f64 th) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(.f64 (cos.f64 th) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.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 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (.f64 (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) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (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) (.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) (sqrt.f64 #s(literal 2 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 (cos.f64 th) (.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 #s(literal 1 binary64) (.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))))) (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2)))))))
(.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))))
(.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.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)))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (pow.f64 (/.f64 #s(literal 1 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 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))))) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (.f64 (-.f64 a1 a2) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))))
(.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(.f64 (/.f64 (cos.f64 th) (+.f64 a2 a1)) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (+.f64 a2 a1)) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.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) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.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 (/.f64 #s(literal 1 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 (/.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (*.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))) (/.f64 (.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 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)) (cos.f64 th)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 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) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.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) (fma.f64 a2 a2 (.f64 a1 a1))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (cos.f64 th)) #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 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(*.f64 (cos.f64 th) a2)
(*.f64 a2 (cos.f64 th))
(cos.f64 th)
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal -1 binary64)))
(neg.f64 (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a2 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 a2) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal 1 binary64) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) a2) #s(literal -1 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(-.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 (.f64 a2 a2) (.f64 a2 a2))) (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #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 #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))))
(/.f64 (fma.f64 (.f64 a1 (.f64 a1 a1)) (/.f64 (.f64 a1 (.f64 a1 a1)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 a1 (.f64 a1 a1)) (/.f64 (.f64 a1 (.f64 a1 a1)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (/.f64 (-.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a2 a2)))) #s(literal 2 binary64))))
(/.f64 #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 a1 (.f64 a1 a1)) (/.f64 (.f64 a1 (.f64 a1 a1)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (/.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 (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) (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 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 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 (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 #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 (neg.f64 (fma.f64 (.f64 a1 (.f64 a1 a1)) (/.f64 (.f64 a1 (.f64 a1 a1)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (/.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 (.f64 a2 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 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal -1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)))))
(/.f64 (fma.f64 a1 (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 (.f64 a1 a1) (/.f64 (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 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (neg.f64 (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) #s(literal -1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 a2 #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 (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 (sqrt.f64 #s(literal 2 binary64)) 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 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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (.f64 a1 a1)) (/.f64 (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 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal -1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (/.f64 (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 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 a1 (neg.f64 a1)) (/.f64 (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 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal -1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (/.f64 (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 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (.f64 a2 a2))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (/.f64 (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 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 a2 (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 (neg.f64 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 #s(literal 1 binary64) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (neg.f64 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) a1))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 a1) a1))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) a1))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 a1 #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 a1 (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 #s(literal 1 binary64) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 a1) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) a1)) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 a1 a1))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) #s(literal 1 binary64))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (neg.f64 (.f64 a1 a1)))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 a1 #s(literal 1 binary64)))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 a1 (neg.f64 a1)))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) a1))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64)) (.f64 (neg.f64 a1) a1))) (.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) a1)) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (+.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 a1 a1))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal 1 binary64))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (neg.f64 (.f64 a1 a1)))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 a1 #s(literal 1 binary64)))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 a1 (neg.f64 a1)))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 #s(literal 1 binary64) a1))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) (.f64 (neg.f64 a1) a1))) (.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 (neg.f64 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 a1) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 a1))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (.f64 a1 a1)))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 #s(literal 1 binary64)))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 (neg.f64 a1)))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) a1))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 a1) a1))) (.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (.f64 a2 #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 #s(literal 1 binary64) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 a1) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (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 (.f64 a2 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)))))
(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 a1 (.f64 a1 a1)) (/.f64 (.f64 a1 (.f64 a1 a1)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) #s(literal 2 binary64))) #s(literal -1 binary64))
(.f64 (fma.f64 (.f64 a1 (.f64 a1 a1)) (/.f64 (.f64 a1 (.f64 a1 a1)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a2 a2) (.f64 (.f64 a2 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)))
(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 (neg.f64 a1) (neg.f64 (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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.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)))
(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 (neg.f64 a1) (/.f64 #s(literal 1 binary64) (neg.f64 (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)))
(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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a2 (.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))))
(exp.f64 (.f64 (log.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.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) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (/.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2)) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2) (/.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 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 (.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) 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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2 (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (.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)))))
(neg.f64 (/.f64 (neg.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 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.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)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (.f64 a1 a1) (.f64 a2 (.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (.f64 a2 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 (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 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 (.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 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (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 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (neg.f64 (cos.f64 th))) (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)) (cos.f64 th)))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (.f64 (.f64 (cos.f64 th) (.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 (.f64 a2 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 (neg.f64 (cos.f64 th)) (fma.f64 a2 a2 (.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (+.f64 a2 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(/.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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)) (.f64 a2 a2)) (.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #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 (cos.f64 th) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (cos.f64 th) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 a2) (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (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)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (cos.f64 th) a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 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 (cos.f64 th) (.f64 a1 a1))) (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (.f64 (cos.f64 th) 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)) 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 (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 a2) (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (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 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (.f64 a2 (.f64 (cos.f64 th) a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) #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 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) (neg.f64 (.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) 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 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 a2) (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.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 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #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 (cos.f64 th) (.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (neg.f64 (*.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 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.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 (cos.f64 th) (neg.f64 (*.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 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (neg.f64 (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) #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 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) (neg.f64 (.f64 a2 a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 a2) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (neg.f64 (*.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 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.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 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (.f64 (cos.f64 th) (.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 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) 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 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (cos.f64 th)) (.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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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) (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 (.f64 (cos.f64 th) a1) (neg.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.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 (.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2))) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 (.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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.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)) (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)) (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 (.f64 (cos.f64 th) a1) (neg.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.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 (.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 #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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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)) (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 (.f64 (cos.f64 th) a1) (neg.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.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 (.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 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #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 (cos.f64 th) (.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 (.f64 (cos.f64 th) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (cos.f64 th)) (.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 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (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 (cos.f64 th) (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) 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)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 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)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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))) (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 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (.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 (.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 (neg.f64 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (neg.f64 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 a2) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (neg.f64 a2) (.f64 (cos.f64 th) 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 (neg.f64 a2) (.f64 (cos.f64 th) 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 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 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)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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)) (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 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (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 (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 (-.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (.f64 (cos.f64 th) (/.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 #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 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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) (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 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))))) (.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)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 (cos.f64 th) (/.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 (cos.f64 th) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(.f64 (cos.f64 th) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.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 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (.f64 (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) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (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) (.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) (sqrt.f64 #s(literal 2 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 (cos.f64 th) (.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 #s(literal 1 binary64) (.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))))) (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2)))))))
(.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))))
(.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.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)))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (pow.f64 (/.f64 #s(literal 1 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 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))))) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (.f64 (-.f64 a1 a2) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))))
(.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(.f64 (/.f64 (cos.f64 th) (+.f64 a2 a1)) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (+.f64 a2 a1)) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.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) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.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 (/.f64 #s(literal 1 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 (/.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (*.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))) (/.f64 (.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 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)) (cos.f64 th)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 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) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.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) (fma.f64 a2 a2 (.f64 a1 a1))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (cos.f64 th)) #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 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(+.f64 (.f64 a2 a2) (.f64 a1 a1))
(+.f64 (.f64 a1 a1) (.f64 a2 a2))
(-.f64 (/.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 (.f64 (.f64 a2 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 (.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 (.f64 a2 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 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (fma.f64 a2 (.f64 a2 (.f64 a2 a2)) (-.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (*.f64 a2 a2))))))
(/.f64 #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 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (+.f64 a2 a1))
(/.f64 (neg.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (neg.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (neg.f64 (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (/.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 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 (.f64 a2 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 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (*.f64 a1 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 (+.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 (.f64 a2 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)))
(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 (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 #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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.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)))
(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 (neg.f64 (cos.f64 th)) (/.f64 #s(literal 1 binary64) (neg.f64 (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 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 a2 (.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))))
(exp.f64 (.f64 (log.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.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) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (/.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2)) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2) (/.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 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 (.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 (*.f64 (cos.f64 th) 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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2 (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (.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)))))
(neg.f64 (/.f64 (neg.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 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.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)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (.f64 a1 a1) (.f64 a2 (.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (.f64 a2 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 (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (cos.f64 th) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (neg.f64 (cos.f64 th)) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (*.f64 a1 a1))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (fma.f64 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 (.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 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (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 (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (neg.f64 (cos.f64 th))) (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)) (cos.f64 th)))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))) (fma.f64 (.f64 a2 a2) (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 a1 (.f64 a1 (.f64 a1 a1)))))
(/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (.f64 (.f64 (cos.f64 th) (.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 (.f64 a2 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 (neg.f64 (cos.f64 th)) (fma.f64 a2 a2 (.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.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 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (/.f64 (.f64 (cos.f64 th) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (+.f64 a2 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(/.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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)) (.f64 a2 a2)) (.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) #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 (cos.f64 th) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (cos.f64 th) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 a2) (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (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)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (cos.f64 th) a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 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 (cos.f64 th) (.f64 a1 a1))) (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (.f64 (cos.f64 th) 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)) 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 (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 a2) (.f64 (cos.f64 th) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (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 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 a2))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (.f64 a2 (.f64 (cos.f64 th) a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) #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 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) (neg.f64 (.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) 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 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 a2) (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (.f64 (cos.f64 th) 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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.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 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #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 (cos.f64 th) (.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (neg.f64 (*.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 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.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 (cos.f64 th) (neg.f64 (*.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 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (neg.f64 (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 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 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 a2 (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) #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 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (cos.f64 th) (neg.f64 (.f64 a2 a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 a2) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (neg.f64 (*.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 (cos.f64 th) a2) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (*.f64 (cos.f64 th) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (cos.f64 th))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) a2) (neg.f64 a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 a2) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.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 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (.f64 (cos.f64 th) (.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 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) 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 (cos.f64 th) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (cos.f64 th)) (.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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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) (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 (.f64 (cos.f64 th) a1) (neg.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.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 (.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2))) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 (.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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.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)) (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)) (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 (.f64 (cos.f64 th) a1) (neg.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.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 (.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 #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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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)) (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 (.f64 (cos.f64 th) a1) (neg.f64 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)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.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 (.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 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 (neg.f64 (.f64 a2 (.f64 (cos.f64 th) 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 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (cos.f64 th) a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #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 (cos.f64 th) (.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 (.f64 (cos.f64 th) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (neg.f64 (cos.f64 th)) (.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 (.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (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 (cos.f64 th) (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (cos.f64 th) (neg.f64 (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (neg.f64 (.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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2) (neg.f64 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 (cos.f64 th) a2) (neg.f64 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 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) 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)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 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)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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))) (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 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (.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 (.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 (neg.f64 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 (neg.f64 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) 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 a2) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 a2) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (neg.f64 a2) (.f64 (cos.f64 th) 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 (neg.f64 a2) (.f64 (cos.f64 th) 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 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (cos.f64 th) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 a1 a1) (neg.f64 (cos.f64 th))))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) (neg.f64 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (.f64 (cos.f64 th) a1) #s(literal 1 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 (neg.f64 (cos.f64 th)) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 #s(literal 1 binary64) (.f64 a1 a1)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 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)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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)) (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 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (neg.f64 (cos.f64 th)) (.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) 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 (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 (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 (-.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (.f64 (cos.f64 th) (/.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 #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 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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) (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 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))))) (.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)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 (cos.f64 th) (/.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 (cos.f64 th) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(.f64 (cos.f64 th) (.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.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 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (.f64 (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) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (.f64 (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) (.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) (sqrt.f64 #s(literal 2 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 (cos.f64 th) (.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 #s(literal 1 binary64) (.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))))) (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))) (.f64 (/.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 (+.f64 a2 a1) (-.f64 a1 a2)))))))
(.f64 (+.f64 (pow.f64 (/.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/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 a2 (.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))))
(.f64 #s(literal 1 binary64) (.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.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)))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (pow.f64 (/.f64 #s(literal 1 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 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a2 a2) (.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th)))))) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 th) (/.f64 (-.f64 (.f64 a2 a2) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (/.f64 (cos.f64 th) (.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (.f64 (-.f64 a1 a2) (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))))
(.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(.f64 (/.f64 (cos.f64 th) (+.f64 a2 a1)) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (+.f64 a2 a1)) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(.f64 (/.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) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(.f64 (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.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 (/.f64 #s(literal 1 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 (/.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (*.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))) (/.f64 (.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 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)) (cos.f64 th)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 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) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.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) (fma.f64 a2 a2 (.f64 a1 a1))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (.f64 (cos.f64 th) (*.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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (cos.f64 th)) #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 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) #s(literal -1 binary64)))
(/.f64 (.f64 (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (cos.f64 th) (.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 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (*.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))))
(.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (cos.f64 th))
(.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))))
(.f64 (.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (+.f64 a2 a1)) (.f64 (-.f64 a1 a2) (cos.f64 th)))
(.f64 (.f64 (cos.f64 th) (.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (fma.f64 a2 a2 (.f64 a1 a1)))
(.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(.f64 (.f64 (cos.f64 th) (.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 (.f64 a2 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 (.f64 a2 a2) (.f64 a2 a2)))
(fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (neg.f64 (.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (neg.f64 (.f64 (.f64 a2 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 a2 a2) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (.f64 (.f64 a1 a1) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(fma.f64 (.f64 a1 a1) (.f64 a1 a1) (.f64 (neg.f64 (.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (.f64 a1 a1) (.f64 a1 a1) (neg.f64 (.f64 (.f64 a2 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 (neg.f64 (.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (.f64 a1 (.f64 a1 a1)) a1 (neg.f64 (.f64 (.f64 a2 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 (.f64 a2 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 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 a1 a1) (.f64 a1 (.f64 a1 (.f64 a1 a1))))) (.f64 (.f64 a2 (.f64 a2 a2)) (.f64 (.f64 a2 (.f64 a2 a2)) (.f64 (.f64 a2 a2) (.f64 (.f64 a2 a2) (.f64 a2 a2)))))) (fma.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a1 a1))) (fma.f64 (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 (.f64 a2 a2) (*.f64 a2 a2))))))
(/.f64 (-.f64 (.f64 (.f64 a1 (.f64 a1 (.f64 a1 a1))) (.f64 a1 (.f64 a1 (.f64 a1 a1)))) (.f64 (.f64 (.f64 a2 a2) (.f64 a2 a2)) (.f64 (.f64 a2 a2) (.f64 a2 a2)))) (fma.f64 a1 (.f64 a1 (.f64 a1 a1)) (.f64 (.f64 a2 a2) (*.f64 a2 a2))))
(/.f64 (.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (fma.f64 (.f64 a2 a2) (.f64 (.f64 a2 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 (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))
(+.f64 (.f64 (cos.f64 th) (.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (cos.f64 th) a2) (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (.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 (/.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 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (.f64 (cos.f64 th) (*.f64 a1 a1))))))
(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 (.f64 (cos.f64 th) 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 (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)))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a1 a1)) (.f64 (.f64 (cos.f64 th) a2) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (.f64 (cos.f64 th) a2)) (.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 (.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 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.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 (cos.f64 th) (.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.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 (.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 (pow.f64 (.f64 (.f64 (cos.f64 th) 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 (cos.f64 th) (.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (cos.f64 th) a2) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.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 (.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 (pow.f64 (.f64 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (.f64 (cos.f64 th) (.f64 a1 a1)))) (-.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (.f64 (cos.f64 th) (.f64 a1 a1)))))
(/.f64 (neg.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 (cos.f64 th) (.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.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 (.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 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64))))) (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (.f64 (cos.f64 th) (.f64 a1 a1))))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (.f64 (cos.f64 th) (.f64 a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (.f64 (cos.f64 th) (.f64 a1 a1))))))
(pow.f64 (/.f64 (fma.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 (.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 (pow.f64 (.f64 (.f64 (cos.f64 th) 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 a2 (.f64 (cos.f64 th) a2)) (.f64 (cos.f64 th) (.f64 a1 a1)))) (-.f64 (.f64 (.f64 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64))))) #s(literal -1 binary64))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (.f64 a1 a1) (.f64 a2 (.f64 (cos.f64 th) a2))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (.f64 a2 a2) (.f64 (cos.f64 th) (.f64 a1 a1))))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) 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 (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 (.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 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 a2 (.f64 (cos.f64 th) 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 (.f64 (cos.f64 th) a2) (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(+.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 (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 (.f64 (cos.f64 th) a2) (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/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 (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 (.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 (cos.f64 th) (.f64 (.f64 a1 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))))))
(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 (cos.f64 th) (.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 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 (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 (.f64 (cos.f64 th) 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 (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 (.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 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 a2 (.f64 (cos.f64 th) a2)) (.f64 (cos.f64 th) (*.f64 a1 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 (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 (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 (.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 (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) th))))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 a2 (.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) 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 a2 (*.f64 (cos.f64 th) a2)))))
(exp.f64 (fma.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 a2))))
(exp.f64 (fma.f64 #s(literal 2 binary64) (log.f64 a2) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(.f64 a2 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
(.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(exp.f64 (-.f64 (.f64 #s(literal 2 binary64) (log.f64 a1)) (.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/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 (neg.f64 (*.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 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 (neg.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 (sqrt.f64 #s(literal 2 binary64))) a1)
(.f64 (.f64 a1 a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))) #s(literal -1 binary64)))
(exp.f64 (-.f64 (.f64 #s(literal 2 binary64) (log.f64 a2)) (.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(neg.f64 (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (.f64 (.f64 a2 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 a2 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(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 (sqrt.f64 #s(literal 2 binary64))) a2)
(.f64 (.f64 a2 a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (neg.f64 (.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.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 (fma.f64 a2 (.f64 a2 a2) (.f64 a1 (.f64 a1 a1))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) (fma.f64 a2 (-.f64 a2 a1) (.f64 a1 a1)))
(/.f64 (.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))) (-.f64 a1 a2))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(.f64 (+.f64 a2 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(.f64 (-.f64 a1 a2) (.f64 (+.f64 a2 a1) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)) (+.f64 a2 a1))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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)

eval462.0ms (3.4%)

Memory: 17.1MiB live, 480.8MiB allocated
Compiler: Compiled 71 049 to 3 009 computations (95.8% saved)

prune320.0ms (2.4%)

Memory

1.0MiB live, 467.8MiB allocated

Pruning

27 alts after pruning (27 fresh and 0 done)

	Pruned	Kept	Total
New	2 558	26	2 584
Fresh	15	1	16
Picked	5	0	5
Done	0	0	0
Total	2 578	27	2 605

Accuracy

100.0%

Counts

2 605 → 27

Alt Table

Click to see full alt table

Status	Accuracy	Program
	13.1%	(/.f64 (.f64 (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(approx (cos th) (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
▶	99.3%	(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
	14.1%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	61.0%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 (.f64 th th) (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
	64.1%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
	66.6%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
▶	25.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64))
	66.4%	(.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))
	98.4%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 1/2 binary64))
	99.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (cos.f64 th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))) #s(literal 1/2 binary64))
	98.3%	(.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
	98.7%	#s(approx (/ (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (* (* (+ a1 a2) (- a1 a2)) (sqrt 2))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
▶	66.6%	#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)))))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
	66.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))
	66.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
	33.7%	#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)) (.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)))))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
	66.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
	37.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)))))
	62.5%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
	55.7%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)))))
▶	64.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
	66.3%	#s(approx (+ (* (/ (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)))))
▶	12.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)))))
	98.5%	#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 (cos.f64 th) #s(literal 1/2 binary64)))))

Compiler

Compiled 1 140 to 628 computations (44.9% saved)

simplify346.0ms (2.6%)

Memory

-9.0MiB live, 317.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

13 934×	`lower-fma.f32`
13 920×	`lower-fma.f64`
5 386×	`lower-*.f32`
5 362×	`lower-*.f64`
4 848×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	56	544
0	93	523
1	181	479
2	444	464
3	1462	440
4	3476	429
5	5264	419
6	5651	419
7	5690	419
8	5724	419
9	5739	419
10	6355	419
11	7512	419
0	8551	414

Stop Event

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

Calls

Call 1

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

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

localize179.0ms (1.3%)

Memory

-25.9MiB live, 255.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	14.788204110417059	(.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))))
accuracy	16.51949409494371	(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
accuracy	19.682829245852393	(.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
accuracy	24.883686952817154	#s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))))
accuracy	0.21322250976844204	(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.44140625	(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy	5.618321739123366	(.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)))))
accuracy	23.681284277158525	#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))))))
accuracy	0.1015625	(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0.2734375	(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.4140625	(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy	21.265777932698214	#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)))))
accuracy	0	(sqrt.f64 #s(literal 2 binary64))
accuracy	0.2734375	(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
accuracy	21.265777932698214	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (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	55.29607742401753	#s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0	(cos.f64 th)
accuracy	0.00390625	(fma.f64 a2 a2 (*.f64 a1 a1))
accuracy	0.23894501953688405	(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.2796283296736122	(.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1)))

Samples

87.0ms

256×

valid

Compiler

Compiled 430 to 49 computations (88.6% saved)

Precisions

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

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

ival-add: 9.0ms (14.1% of total)

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

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

const: 4.0ms (6.3% of total)

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

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

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

exact: 0.0ms (0% of total)

series56.0ms (0.4%)

Memory

-9.6MiB live, 128.1MiB allocated

Counts

24 → 612

Calls

Call 1

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

Outputs
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (patch (.f64 (cos.f64 th) (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 (pow a1 2) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (.f64 a1 a1)) (patch (fma.f64 a2 a2 (.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (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 a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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 th) (#s(alt #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))))) (patch #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))))) #<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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.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))) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<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 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)))))) (patch #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))) (taylor inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))) (taylor -inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor -inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor -inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))) (taylor -inf th) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (taylor 0 a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (taylor 0 a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (taylor 0 a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (taylor 0 a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (taylor inf a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2)))))) (taylor inf a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2)))))) (taylor inf a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2)))))) (taylor inf a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (taylor -inf a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2)))))) (taylor -inf a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2)))))) (taylor -inf a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2)))))) (taylor -inf a1) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (taylor 0 a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (taylor 0 a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (taylor 0 a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (taylor 0 a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (taylor inf a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2)))))) (taylor inf a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2)))))) (taylor inf a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2)))))) (taylor inf a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (taylor -inf a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2)))))) (taylor -inf a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2)))))) (taylor -inf a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2)))))) (taylor -inf a2) (#s(alt (.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))))) (patch (.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))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (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 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (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 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (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 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (pow th 2)) (taylor inf th) (#s(alt (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor inf th) (#s(alt (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor inf th) (#s(alt (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor inf th) (#s(alt (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (pow th 2)) (taylor -inf th) (#s(alt (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor -inf th) (#s(alt (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor -inf th) (#s(alt (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor -inf th) (#s(alt (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (patch (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2))))) (taylor 0 a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (+ (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))) (* (pow a1 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))))) (taylor 0 a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (+ (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))) (* (pow a1 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))))) (taylor 0 a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (+ (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))) (* (pow a1 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))))) (taylor 0 a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))))) (taylor inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))))) (taylor inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))))) (taylor inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))))) (taylor -inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))))) (taylor -inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))))) (taylor -inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2))))) (taylor 0 a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (+ (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* (pow a2 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))))) (taylor 0 a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (+ (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* (pow a2 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))))) (taylor 0 a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (+ (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* (pow a2 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))))) (taylor 0 a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (taylor inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))))) (taylor inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))))) (taylor inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))))) (taylor inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))))) (taylor -inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))))) (taylor -inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* -1/2 (sqrt 2)) (+ (* -1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))))) (taylor -inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor 0 th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor 0 th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor 0 th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor -inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor -inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor -inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (sqrt 2)) (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2))))))) (taylor 0 a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (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)))))))) (taylor 0 a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (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)))))))) (taylor 0 a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (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)))))))) (taylor 0 a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))))) (taylor inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))))) (taylor inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))))) (taylor inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))))) (taylor inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))))) (taylor -inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))))) (taylor -inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))))) (taylor -inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))))) (taylor -inf a1) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<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 a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (+ (* (pow a2 2) (+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 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 a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (+ (* (pow a2 2) (+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 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 a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (+ (* (pow a2 2) (+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 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 a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))))) (taylor inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))))) (taylor inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))))) (taylor inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))))) (taylor inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))))) (taylor -inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))))) (taylor -inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))))) (taylor -inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (+ (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))))) (taylor -inf a2) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))) (taylor 0 th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))) (taylor 0 th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 4) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (+ (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 4))))) (taylor inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (+ (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 4))))) (taylor inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 4) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor -inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (+ (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 4))))) (taylor -inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (+ (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 4))))) (taylor -inf th) (#s(alt (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) (patch (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))))))) (taylor 0 th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor -inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (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)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (+ (* (pow a2 2) (sqrt 2)) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))))) (taylor 0 th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (+ (* (pow a2 2) (sqrt 2)) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))))))) (taylor 0 th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (+ (* (pow a2 2) (sqrt 2)) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (+ (* 1/24 (* (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2))))))))))))) (taylor 0 th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf th) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) (patch #s(approx (+ (* (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 th th) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))))) #<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) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2))))) (taylor 0 a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (taylor inf a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (taylor -inf a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (* (pow th 2) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2))))) (taylor 0 a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2))))) (taylor 0 a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2))))) (taylor 0 a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))) (taylor inf a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))) (taylor -inf a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/24 (* (pow th 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (patch (.f64 (.f64 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (taylor 0 th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (taylor 0 th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))) (taylor 0 th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 4) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor inf th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor inf th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor inf th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (* (pow th 4) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor -inf th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor -inf th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 4) (+ (* -1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))) (* 1/24 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))) (taylor -inf th) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.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)))))) (taylor 0 a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2)))))) (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2))))))) (taylor 0 a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2)))))) (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2))))))) (taylor 0 a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2)))))) (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2))))))) (taylor 0 a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2)))))) (taylor inf a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))) (taylor inf a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))) (taylor inf a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))) (taylor inf a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2)))))) (taylor -inf a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))) (taylor -inf a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))) (taylor -inf a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 2)))))) (pow a1 2)))) (taylor -inf a1) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (taylor 0 a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 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 a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 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 a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 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 a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2)))))) (taylor inf a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))) (taylor inf a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))) (taylor inf a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))) (taylor inf a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2)))))) (taylor -inf a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))) (taylor -inf a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))) (taylor -inf a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (pow th 2) (+ (* -1/2 (sqrt 2)) (* 1/24 (* (pow th 2) (sqrt 2))))) (/ (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))) (pow a2 2)))) (taylor -inf a2) (#s(alt (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (patch (.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 (.f64 th th) #s(literal 1/24 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) #<representation binary64>) () ())) ())

Calls

153 calls:

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

simplify368.0ms (2.7%)

Memory

22.8MiB live, 551.2MiB allocated

Algorithm

1×	egg-herbie

Rules

16 396×	`lower-fma.f64`
16 396×	`lower-fma.f32`
7 300×	`lower-*.f64`
7 300×	`lower-*.f32`
2 866×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	305	10909
1	1107	9802
2	4539	9248
3	7411	8966
4	7757	8666
5	7847	8666
0	8071	7988

Stop Event

1×	iter limit
1×	node limit

Counts

612 → 612

Calls

Call 1

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

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

rewrite735.0ms (5.5%)

Memory

-27.8MiB live, 610.7MiB allocated

Rules

4 612×	`lower-*.f32`
4 588×	`lower-*.f64`
4 582×	`lower-/.f32`
4 572×	`lower-/.f64`
4 418×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	56	462
0	93	441
1	330	383
2	2844	383
0	8329	378

Stop Event

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

Counts

24 → 857

Calls

Call 1

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

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

eval221.0ms (1.6%)

Memory: 11.4MiB live, 527.2MiB allocated
Compiler: Compiled 48 964 to 2 777 computations (94.3% saved)

prune372.0ms (2.8%)

Memory

-2.0MiB live, 581.9MiB allocated

Pruning

38 alts after pruning (35 fresh and 3 done)

	Pruned	Kept	Total
New	1 589	21	1 610
Fresh	8	14	22
Picked	2	3	5
Done	0	0	0
Total	1 599	38	1 637

Accuracy

100.0%

Counts

1 637 → 38

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	99.3%	(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
	61.0%	(/.f64 (.f64 #s(approx (cos th) (fma.f64 th (.f64 th (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
	14.1%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	66.6%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
▶	99.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) #s(literal 1/2 binary64))
	66.4%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
	63.9%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
	98.4%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 1/2 binary64))
	98.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (cos.f64 th) (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 1/2 binary64))
	60.5%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) #s(approx (+ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (* th th) (+ (* (sqrt 2) (* -1/2 (+ (* a1 a1) (* a2 a2)))) (* (* (* th th) 1/24) (* (sqrt 2) (+ (* a1 a1) (* a2 a2))))))) (.f64 (.f64 a2 a2) (fma.f64 (.f64 th th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 1/2 binary64))
	98.7%	#s(approx (/ (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (* (* (+ a1 a2) (- a1 a2)) (sqrt 2))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
✓	66.6%	#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)))))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
▶	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
▶	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
	66.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))
	66.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
	33.7%	#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)) (.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)))))
	66.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
	37.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)))))
	62.5%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
	55.7%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2)))))
	64.2%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
	64.1%	#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)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))))
	63.9%	#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)) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
	11.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)) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
	66.3%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a2 (sqrt 2)) a2) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
▶	12.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a2 (sqrt 2)) a2) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
✓	12.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)))))
	12.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
	12.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
	12.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
▶	62.5%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* th (* th -1/2)) 1) (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2)))) (/.f64 (.f64 a2 (fma.f64 (.f64 #s(literal -1/2 binary64) (*.f64 th th)) a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
	13.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* th (* th -1/2)) 1) (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2)))) (/.f64 (.f64 a1 (fma.f64 (.f64 #s(literal -1/2 binary64) (*.f64 th th)) a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
	18.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* th (* th -1/2)) 1) (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2)))) (.f64 (/.f64 (.f64 th th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) #s(literal -1/2 binary64)))))
	98.5%	#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 (cos.f64 th) #s(literal 1/2 binary64)))))

Compiler

Compiled 1 384 to 822 computations (40.6% saved)

simplify212.0ms (1.6%)

Memory

15.0MiB live, 108.1MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

3 100×	`lower-fma.f32`
3 092×	`lower-fma.f64`
1 972×	`lower-*.f32`
1 952×	`lower-*.f64`
792×	`associate-r`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	61	462
0	93	433
1	170	400
2	329	400
3	794	394
4	1320	388
5	1719	376
6	2035	376
7	2147	376
8	2233	376
9	2255	376
10	2263	376
11	2263	376
12	2364	376
13	2508	376
14	2662	376
15	3224	376
16	3417	376
17	3433	376
18	3631	376
19	3940	376
20	3940	376
0	3940	374

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

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

localize226.0ms (1.7%)

Memory

9.2MiB live, 248.5MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.1875	(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0.2734375	(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
accuracy	1.0	(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
accuracy	21.265777932698214	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
accuracy	0.2734375	(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.43359375	(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a2)
accuracy	1.0	(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
accuracy	21.265777932698214	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
accuracy	0.6146874022428775	#s(approx (* (+ (* th (* th -1/2)) 1) (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2)))) (/.f64 (.f64 a2 (fma.f64 (.f64 #s(literal -1/2 binary64) (*.f64 th th)) a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
accuracy	1.4277893556831724	(.f64 a2 (fma.f64 (.f64 #s(literal -1/2 binary64) (*.f64 th th)) a2 a2))
accuracy	3.012569659955185	(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 th th)) a2 a2)
accuracy	23.681284277158525	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* th (* th -1/2)) 1) (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2)))) (/.f64 (.f64 a2 (fma.f64 (.f64 #s(literal -1/2 binary64) (*.f64 th th)) a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
accuracy	0.1328125	(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
accuracy	0.44140625	(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy	21.265777932698214	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a2 (sqrt 2)) a2) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
accuracy	55.29607742401753	#s(approx (+ (* (/ a2 (sqrt 2)) a2) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
accuracy	0.0078125	(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy	0.2068219343245562	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) #s(literal 1/2 binary64))
accuracy	0.2265625	(*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
accuracy	0.3316138369134186	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))

Samples

110.0ms

256×

valid

Compiler

Compiled 335 to 52 computations (84.5% saved)

Precisions

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

ival-mult: 48.0ms (54.5% of total)

ival-div: 17.0ms (19.3% of total)

ival-add: 15.0ms (17% of total)

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

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

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

exact: 0.0ms (0% of total)

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

series73.0ms (0.5%)

Memory

-36.4MiB live, 52.7MiB allocated

Counts

22 → 528

Calls

Call 1

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

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

Calls

132 calls:

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

simplify428.0ms (3.2%)

Memory

32.9MiB live, 357.8MiB allocated

Algorithm

1×	egg-herbie

Rules

19 418×	`lower-fma.f64`
19 418×	`lower-fma.f32`
6 610×	`lower-*.f64`
6 610×	`lower-*.f32`
5 240×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	226	8748
1	800	7947
2	3078	7697
0	8219	7215

Stop Event

1×	iter limit
1×	node limit

Counts

528 → 527

Calls

Call 1

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

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

rewrite360.0ms (2.7%)

Memory

26.9MiB live, 360.5MiB allocated

Rules

5 490×	`lower-fma.f32`
5 482×	`lower-fma.f64`
4 542×	`lower-/.f32`
4 530×	`lower-/.f64`
4 394×	`lower-*.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	61	401
0	93	362
1	343	322
2	2777	322
0	8264	320

Stop Event

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

Counts

22 → 879

Calls

Call 1

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

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

eval373.0ms (2.8%)

Memory: -5.9MiB live, 426.3MiB allocated
Compiler: Compiled 32 386 to 1 945 computations (94% saved)

prune650.0ms (4.8%)

Memory

21.8MiB live, 629.6MiB allocated

Pruning

41 alts after pruning (34 fresh and 7 done)

	Pruned	Kept	Total
New	1 463	17	1 480
Fresh	13	17	30
Picked	1	4	5
Done	0	3	3
Total	1 477	41	1 518

Accuracy

100.0%

Counts

1 518 → 41

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	99.3%	(/.f64 (.f64 (cos.f64 th) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
	61.0%	(/.f64 (.f64 #s(approx (cos th) (fma.f64 th (.f64 th (fma.f64 (.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64))) (fma.f64 a2 a2 (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
	14.1%	(/.f64 #s(approx (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (-.f64 a1 a2) (+.f64 a1 a2)))) (.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
	66.6%	(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
✓	99.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) #s(literal 1/2 binary64))
	66.4%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
	63.9%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (fma.f64 #s(literal -1/2 binary64) (.f64 th th) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
	98.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 1/2 binary64))
	98.4%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 1/2 binary64))
	98.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 (cos.f64 th) (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 1/2 binary64))
	98.1%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) (.f64 #s(approx (+ ( a1 a1) (* a2 a2)) (.f64 a2 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) #s(literal 1/2 binary64))
	60.5%	(.f64 #s(approx (+ ( (cos th) (* (* a2 a2) (sqrt 2))) (* (sqrt 2) (* (cos th) (* a1 a1)))) #s(approx (+ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (* th th) (+ (* (sqrt 2) (* -1/2 (+ (* a1 a1) (* a2 a2)))) (* (* (* th th) 1/24) (* (sqrt 2) (+ (* a1 a1) (* a2 a2))))))) (.f64 (.f64 a2 a2) (fma.f64 (.f64 th th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 1/2 binary64))
	98.7%	#s(approx (/ (* (* (+ (* a1 a1) (* a2 a2)) (* (+ a1 a2) (- a1 a2))) (cos th)) (* (* (+ a1 a2) (- a1 a2)) (sqrt 2))) (/.f64 (.f64 a2 (.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
✓	66.6%	#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)))))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
✓	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 a2) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) a2))) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
✓	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2 (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) a2) (.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
	66.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) a2) (.f64 a1 (neg.f64 a1)))) (*.f64 (/.f64 #s(literal 1 binary64) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
	66.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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)))
	66.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
	33.7%	#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)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)))))
	66.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
	37.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
	64.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.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)))))
	63.9%	#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)) #s(approx (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
	66.3%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a2 (sqrt 2)) a2) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
	12.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a2 (sqrt 2)) a2) (/ (* a1 a1) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
	12.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a2 (sqrt 2)) a2) (/ (* a1 a1) (sqrt 2))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
	12.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a2 (sqrt 2)) a2) (/ (* a1 a1) (sqrt 2))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))))
	43.5%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a2 (sqrt 2)) a2) (/ (* a1 a1) (sqrt 2))) (.f64 a1 (fma.f64 a1 (/.f64 (.f64 a2 a2) (.f64 a1 (.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
✓	12.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a2 (sqrt 2)) a2) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
	12.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a2 (sqrt 2)) a2) (/ (* a1 a1) (sqrt 2))) (.f64 a1 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1))))
✓	12.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)))))
	62.5%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* th (* th -1/2)) 1) (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2)))) (/.f64 (.f64 (fma.f64 th (.f64 (*.f64 th #s(literal -1/2 binary64)) a2) a2) a2) (sqrt.f64 #s(literal 2 binary64)))))
	16.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* th (* th -1/2)) 1) (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2)))) (/.f64 (.f64 a2 #s(approx (+ ( (* -1/2 (* th th)) a2) a2) (.f64 a2 (.f64 (*.f64 th th) #s(literal -1/2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))
	11.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* th (* th -1/2)) 1) (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2)))) (.f64 (fma.f64 (.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
	63.9%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* th (* th -1/2)) 1) (+ (* a1 (/ a1 (sqrt 2))) (/ (* a2 a2) (sqrt 2)))) (.f64 (/.f64 (fma.f64 th (.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))

Compiler

Compiled 2 335 to 731 computations (68.7% saved)

regimes261.0ms (1.9%)

Memory

-26.1MiB live, 254.4MiB allocated

Counts

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

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

Calls

8 calls:

37.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)))
35.0ms	(*.f64 a1 a1)
35.0ms	(cos.f64 th)
29.0ms	a1
28.0ms	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)

regimes213.0ms (1.6%)

Memory

23.2MiB live, 208.7MiB allocated

Counts

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

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

Calls

8 calls:

41.0ms	(*.f64 a1 a1)
29.0ms	th
29.0ms	a1
26.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
22.0ms	a2

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)

regimes244.0ms (1.8%)

Memory

10.1MiB live, 204.1MiB allocated

Counts

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

Outputs

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

Calls

8 calls:

49.0ms	(*.f64 a2 a2)
49.0ms	th
36.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
35.0ms	(*.f64 a1 a1)
19.0ms	a2

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes155.0ms (1.2%)

Memory

-0.5MiB live, 228.8MiB allocated

Counts

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

Outputs

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

Calls

8 calls:

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

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes169.0ms (1.3%)

Memory

20.4MiB live, 250.4MiB allocated

Counts

65 → 1

Calls

Call 1

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

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

Calls

8 calls:

26.0ms	a1
23.0ms	th
23.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
21.0ms	(*.f64 a2 a2)
21.0ms	(cos.f64 th)

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes155.0ms (1.2%)

Memory

-5.7MiB live, 297.2MiB allocated

Counts

63 → 1

Calls

Call 1

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

Calls

8 calls:

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

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes177.0ms (1.3%)

Memory

30.0MiB live, 278.8MiB allocated

Counts

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

Outputs

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

Calls

8 calls:

40.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)))
32.0ms	a1
24.0ms	th
17.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
16.0ms	a2

Results

Accuracy	Segments	Branch
66.6%	1	`a1`
73.7%	4	`a2`
70.1%	2	`th`
80.0%	2	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
78.1%	2	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
78.1%	2	`(cos.f64 th)`
66.6%	1	`(*.f64 a1 a1)`
68.6%	2	`(*.f64 a2 a2)`

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes23.0ms (0.2%)

Memory

-4.1MiB live, 40.9MiB allocated

Counts

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

Outputs

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

Calls

1 calls:

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

Compiler

Compiled 22 to 12 computations (45.5% saved)

regimes42.0ms (0.3%)

Memory

-27.3MiB live, 30.8MiB allocated

Counts

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

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

Calls

1 calls:

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

Compiler

Compiled 22 to 12 computations (45.5% saved)

regimes10.0ms (0.1%)

Memory

26.5MiB live, 26.5MiB allocated

Counts

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

Outputs

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

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

Calls

1 calls:

8.0ms

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

Results

Accuracy	Segments	Branch
79.9%	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)

regimes105.0ms (0.8%)

Memory

0.9MiB live, 59.6MiB allocated

Counts

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

Outputs

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

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

Compiler

Compiled 22 to 12 computations (45.5% saved)

regimes7.0ms (0.1%)

Memory

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

Outputs

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

6.0ms

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

Results

Accuracy	Segments	Branch
79.9%	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)

regimes92.0ms (0.7%)

Memory

12.6MiB live, 109.1MiB allocated

Counts

14 → 1

Calls

Call 1

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

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

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes57.0ms (0.4%)

Memory

-6.7MiB live, 88.9MiB allocated

Counts

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

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

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes25.0ms (0.2%)

Memory

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

Outputs

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

Calls

8 calls:

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

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes94.0ms (0.7%)

Memory

-32.5MiB live, 33.7MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

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

Calls

8 calls:

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

Results

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

Compiler

Compiled 59 to 40 computations (32.2% saved)

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-9.689442226879883e-130	-4.5085665662200724e-197

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-9.689442226879883e-130	-4.5085665662200724e-197

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-9.689442226879883e-130	-4.5085665662200724e-197

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-9.689442226879883e-130	-4.5085665662200724e-197

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.6MiB live, 0.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-9.689442226879883e-130	-4.5085665662200724e-197

Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory

0.7MiB live, 0.7MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-9.689442226879883e-130	-4.5085665662200724e-197

Compiler

Compiled 25 to 18 computations (28% saved)

simplify19.0ms (0.1%)

Memory

-23.1MiB live, 27.1MiB allocated

Algorithm

1×	egg-herbie

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	120	924
1	148	924

Stop Event

1×

saturated

Calls

Call 1

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

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

soundness2.3s (17.1%)

Memory

56.9MiB live, 1 840.6MiB allocated

Rules

34 694×	`lower-fma.f64`
34 694×	`lower-fma.f32`
19 418×	`lower-fma.f64`
19 418×	`lower-fma.f32`
16 396×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	41	238
0	68	227
1	233	191
2	2087	191
0	8086	189
0	305	10909
1	1107	9802
2	4539	9248
3	7411	8966
4	7757	8666
5	7847	8666
0	8071	7988
0	509	6983
1	1800	6373
2	6991	6304
0	8183	5953
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	226	8748
1	800	7947
2	3078	7697
0	8219	7215
0	61	401
0	93	362
1	343	322
2	2777	322
0	8264	320

Stop Event

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

Compiler

Compiled 1 103 to 466 computations (57.8% saved)

preprocess183.0ms (1.4%)

Memory

9.8MiB live, 383.8MiB allocated

Remove

(abs a1)

(abs th)

Compiler

Compiled 2 406 to 1 020 computations (57.6% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze0.0ms (0%)

sample1.2s (9.2%)

explain184.0ms (1.4%)

preprocess141.0ms (1%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify6.0ms (0%)

localize61.0ms (0.5%)

series16.0ms (0.1%)

simplify428.0ms (3.2%)

rewrite283.0ms (2.1%)

eval52.0ms (0.4%)

prune78.0ms (0.6%)

simplify345.0ms (2.6%)

localize184.0ms (1.4%)

series53.0ms (0.4%)

simplify231.0ms (1.7%)

rewrite428.0ms (3.2%)

eval462.0ms (3.4%)

prune320.0ms (2.4%)

simplify346.0ms (2.6%)

localize179.0ms (1.3%)

series56.0ms (0.4%)

simplify368.0ms (2.7%)

rewrite735.0ms (5.5%)

eval221.0ms (1.6%)

prune372.0ms (2.8%)

simplify212.0ms (1.6%)

localize226.0ms (1.7%)

series73.0ms (0.5%)

simplify428.0ms (3.2%)

rewrite360.0ms (2.7%)

eval373.0ms (2.8%)

prune650.0ms (4.8%)

regimes261.0ms (1.9%)

regimes213.0ms (1.6%)

regimes244.0ms (1.8%)

regimes155.0ms (1.2%)

regimes169.0ms (1.3%)

regimes155.0ms (1.2%)

regimes177.0ms (1.3%)

regimes23.0ms (0.2%)

regimes42.0ms (0.3%)

regimes10.0ms (0.1%)

regimes105.0ms (0.8%)

regimes7.0ms (0.1%)

regimes92.0ms (0.7%)

regimes57.0ms (0.4%)

regimes25.0ms (0.2%)

regimes94.0ms (0.7%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

simplify19.0ms (0.1%)

soundness2.3s (17.1%)

preprocess183.0ms (1.4%)

end0.0ms (0%)

Profiling