Migdal et al, Equation (64)

Time bar (total: 12.1s)

start0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

analyze0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
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.3s (10.9%)

Memory
-103.1MiB live, 1 874.9MiB allocated
Samples
754.0ms8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 544.0ms
ival-cos: 200.0ms (36.8% of total)
ival-mult: 188.0ms (34.6% of total)
ival-sqrt: 58.0ms (10.7% of total)
ival-div: 49.0ms (9% of total)
ival-add: 35.0ms (6.4% of total)
exact: 6.0ms (1.1% of total)
ival-true: 5.0ms (0.9% of total)
ival-assert: 3.0ms (0.6% of total)
Bogosity

explain138.0ms (1.1%)

Memory
-18.6MiB live, 301.3MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
00-0-a1
00-0-(*.f64 a1 a1)
00-0-(sqrt.f64 #s(literal 2 binary64))
00-0-th
00-0-#s(literal 2 binary64)
00-0-(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
00-0-(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
00-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)))
00-0-(*.f64 a2 a2)
00-0-(cos.f64 th)
00-0-(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
00-0-a2
Confusion
Predicted +Predicted -
+00
-0256
Precision
0/0
Recall
0/0
Confusion?
Predicted +Predicted MaybePredicted -
+000
-00256
Precision?
0/0
Recall?
0/0
Freqs
test
numberfreq
0256
Total Confusion?
Predicted +Predicted MaybePredicted -
+000
-001
Precision?
0/0
Recall?
0/0
Samples
52.0ms512×0valid
Compiler

Compiled 138 to 40 computations (71% saved)

Precisions
Click to see histograms. Total time spent on operations: 33.0ms
ival-mult: 12.0ms (35.9% of total)
ival-cos: 11.0ms (32.9% of total)
ival-sqrt: 4.0ms (12% of total)
ival-div: 3.0ms (9% of total)
ival-add: 2.0ms (6% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

preprocess138.0ms (1.1%)

Memory
8.0MiB live, 46.6MiB allocated
Algorithm
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)

IterNodesCost
040120
1130120
2373120
31018120
42414120
54784120
65686120
76500120
86573120
96589120
106760120
116878120
126890120
136890120
146890120
01219
02013
13313
25813
38813
410013
010012
Stop Event
iter limit
saturated
iter limit
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.5MiB live, 0.5MiB 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
StatusAccuracyProgram
99.6%
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Compiler

Compiled 22 to 12 computations (45.5% saved)

simplify6.0ms (0%)

Memory
13.6MiB live, 13.6MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

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

IterNodesCost
01256
02050
13350
25850
38850
410050
010049
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a1 a1)
a1
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 a2 a2)
a2
Outputs
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a1 a1)
a1
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 a2)
a2

localize45.0ms (0.4%)

Memory
-26.5MiB live, 93.6MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.00390625
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
accuracy0.19140625
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
accuracy0.201503759768442
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
accuracy0.717128759768442
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Samples
28.0ms256×0valid
Compiler

Compiled 58 to 14 computations (75.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 17.0ms
ival-mult: 7.0ms (40.3% of total)
ival-cos: 6.0ms (34.5% of total)
ival-div: 2.0ms (11.5% of total)
ival-sqrt: 2.0ms (11.5% of total)
ival-add: 1.0ms (5.8% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series21.0ms (0.2%)

Memory
6.6MiB live, 45.2MiB 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 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 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 (/.f64 (cos.f64 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 (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 (/.f64 (cos.f64 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 (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) (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) (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 (/ 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 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 (/ (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 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)) (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 (/ (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) (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) (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 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)) (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 (/ (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) (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) (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 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 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 (/.f64 (cos.f64 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 (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 (/.f64 (cos.f64 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 (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

9 calls:

TimeVariablePointExpression
4.0ms
a2
@0
((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
2.0ms
a1
@0
((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
2.0ms
th
@0
((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
2.0ms
th
@-inf
((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
2.0ms
th
@inf
((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) (* (/ (cos th) (sqrt 2)) (* a2 a2)))

simplify390.0ms (3.2%)

Memory
13.9MiB live, 599.4MiB allocated
Algorithm
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)

IterNodesCost
01111498
13431366
212061262
339001233
084281172
Stop Event
iter limit
node limit
Counts
108 → 108
Calls
Call 1
Inputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow 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 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 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 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 a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (pow a1 2) (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)))
(/ 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)))
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)))
(/ (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 a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (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 a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(cos th)
(cos th)
(cos th)
(cos th)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (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 a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(cos th)
(cos th)
(cos th)
(cos th)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (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 a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (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 a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (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 a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
Outputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow 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)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow 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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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))) (+ (* -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) (*.f64 (*.f64 (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (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)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (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 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.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)) (/.f64 (*.f64 a1 a1) (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 (*.f64 th 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 (*.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 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 (*.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 th (*.f64 th #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 th (*.f64 th (fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(/ (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 (*.f64 th 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 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.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)) (/.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 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (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)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow 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))
(/.f64 (*.f64 a2 (*.f64 a2 (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) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (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)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow 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))
(/.f64 (*.f64 a2 (*.f64 a2 (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))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow 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))
(/.f64 (*.f64 a2 (*.f64 a2 (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))
(/.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 (*.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 a2 (*.f64 a2 (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))
(/.f64 (*.f64 a2 (*.f64 a2 (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))
(/.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 (*.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 a2 (*.f64 a2 (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))
(/.f64 (*.f64 a2 (*.f64 a2 (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)))

rewrite584.0ms (4.8%)

Memory
-19.4MiB live, 388.8MiB 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)

IterNodesCost
01244
02038
15838
241138
3733138
0843437
Stop Event
iter limit
node limit
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))))

eval58.0ms (0.5%)

Memory
20.2MiB live, 96.7MiB allocated
Compiler

Compiled 14 708 to 1 013 computations (93.1% saved)

prune115.0ms (1%)

Memory
-18.5MiB live, 142.1MiB allocated
Pruning

19 alts after pruning (19 fresh and 0 done)

PrunedKeptTotal
New47119490
Fresh000
Picked101
Done000
Total47219491
Accuracy
100.0%
Counts
491 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.6%
(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))))))
99.6%
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
99.6%
(/.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 a1 (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
15.6%
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.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)))))
15.7%
(/.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))))
26.6%
(/.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)))
26.6%
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
99.6%
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
99.3%
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
99.3%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a1 a1 (*.f64 a2 a2)))))
99.6%
(*.f64 (fma.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 1/2 binary64))
99.6%
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
99.6%
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
26.5%
(*.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)))
99.5%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
69.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
52.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
98.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
61.7%
#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)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
Compiler

Compiled 914 to 508 computations (44.4% saved)

simplify232.0ms (1.9%)

Memory
24.2MiB live, 182.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
cost-diff0
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th))
cost-diff0
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
cost-diff128
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
cost-diff0
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
cost-diff0
(/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
cost-diff1344
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
cost-diff0
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 a2 a2)
cost-diff0
(fma.f64 a1 a1 (*.f64 a2 a2))
cost-diff0
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
(sqrt.f64 #s(literal 2 binary64))
cost-diff0
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff1344
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
(*.f64 a2 a2)
cost-diff0
(fma.f64 a1 a1 (*.f64 a2 a2))
cost-diff0
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff1088
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
Rules
10 490×lower-fma.f32
10 480×lower-fma.f64
4 414×lower-*.f32
4 388×lower-*.f64
1 990×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
045443
076385
1153344
2305344
3688344
42335344
55985329
08307326
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 #s(literal 1 binary64) (cos.f64 th))
#s(literal 1 binary64)
(cos.f64 th)
th
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 a1)
a1
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
a2
(/.f64 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
a1
#s(literal 1 binary64)
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 a1 a1)
a1
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
(*.f64 a1 (*.f64 a1 a1))
(*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(*.f64 a2 a2)
a2
(*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))
(*.f64 a2 (*.f64 a2 a2))
(cos.f64 th)
th
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 #s(literal 1 binary64) (cos.f64 th))
#s(literal 1 binary64)
(cos.f64 th)
th
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 a1)
a1
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (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 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
a2
(/.f64 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
a1
#s(literal 1 binary64)
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 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 a1 a2) (*.f64 a2 (*.f64 a2 (-.f64 a2 a1)))))))
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th))
(*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 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)))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 a1 a1)
a1
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
(*.f64 a1 (*.f64 a1 a1))
(*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 a2 a2)
a2
(*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))
(*.f64 a2 (*.f64 a2 a2))
(cos.f64 th)
th
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (+.f64 a1 a2) (*.f64 a2 (*.f64 a2 (-.f64 a2 a1))))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (+.f64 a1 a2) (*.f64 a2 (*.f64 a2 (-.f64 a2 a1)))))
(*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (+.f64 a1 a2) (*.f64 a2 (*.f64 a2 (-.f64 a2 a1))))
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(*.f64 (+.f64 a1 a2) (-.f64 a2 a1))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

localize190.0ms (1.6%)

Memory
-15.3MiB live, 140.2MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.11328125
(*.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)))
accuracy0.23040182638991732
(*.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))
accuracy3.9882812500000004
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
accuracy48.16829535697745
(/.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))))
accuracy0.22332001953688402
(/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
accuracy3.8436702979629005
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
accuracy8.264425045136406
(/.f64 a2 (*.f64 a1 a1))
accuracy25.33475112162533
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
accuracy0
(cos.f64 th)
accuracy0.015625
(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy0.193691259768442
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.717128759768442
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
accuracy0.125
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.18816376953688405
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
accuracy0.40234375
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy19.633872450520993
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
accuracy0.015625
(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy0.07421875
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
accuracy0.1015625
(/.f64 #s(literal 1 binary64) (cos.f64 th))
accuracy0.21322250976844204
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
Samples
100.0ms256×0valid
Compiler

Compiled 428 to 43 computations (90% saved)

Precisions
Click to see histograms. Total time spent on operations: 77.0ms
ival-mult: 45.0ms (58.2% of total)
ival-div: 12.0ms (15.5% of total)
ival-cos: 10.0ms (12.9% of total)
ival-add: 6.0ms (7.8% of total)
ival-sqrt: 2.0ms (2.6% of total)
ival-sub: 1.0ms (1.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series103.0ms (0.8%)

Memory
-1.4MiB live, 78.5MiB allocated
Counts
23 → 552
Calls
Call 1
Inputs
#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (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 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 (*.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 (/.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<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 (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())
#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
Outputs
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow 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 a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 (*.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 a2 2) (cos th)) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (pow a1 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (* -1 (* (pow a1 2) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (* (pow a1 2) (- (* (pow a1 2) (- (/ (cos th) (* (pow a2 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a2 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a2 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 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 (/ a2 (pow a1 2)) (taylor 0 a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (sqrt 2)) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ (* -1 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ (* -1 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (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) (sqrt 2)) (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 (*.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)) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a1 2)) (taylor inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2))))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 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 (/ a2 (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (sqrt 2)) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4))))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4))))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (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) (sqrt 2)) (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 (*.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)) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor -inf a1) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a1 2)) (taylor -inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2))))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 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 (/ a2 (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a1) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (sqrt 2)) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4))))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4))))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (*.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 (/ 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 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (* 1/24 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* 1/24 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))))))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* 1/24 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (* 1/24 (+ (pow a1 6) (pow a2 6))))))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 1/2 (pow th 2))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (+ 1/2 (* 5/24 (pow th 2))))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (+ 1/2 (* (pow th 2) (+ 5/24 (* 61/720 (pow th 2))))))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2))) (taylor 0 th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 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) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 (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) (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 a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 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 #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (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) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 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) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 (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) (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 a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 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 #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (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) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow 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 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 a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 (/ (* (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 a1 2) (cos th)) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (/ (pow a2 2) (pow a1 2))) (taylor 0 a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (* -1 (* (pow a2 2) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (* (pow a2 2) (- (* (pow a2 2) (- (/ (cos th) (* (pow a1 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a1 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a1 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor 0 a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 4) (sqrt 2)) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* (pow a1 4) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 4) (sqrt 2)) (* (pow a2 2) (+ (* -1 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (sqrt 2))))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 4) (sqrt 2)) (* (pow a2 2) (+ (* -1 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (sqrt 2))))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (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 (*.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) (sqrt 2)) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (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) (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)) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (pow a1 2)) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2))))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor inf a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (sqrt 2)) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4))))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4))))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (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 (*.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) (sqrt 2)) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (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) (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)) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (patch (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.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))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (pow a1 2)) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (patch (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2))))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ a2 (pow a1 2)) (taylor -inf a2) (#s(alt (/.f64 a2 (*.f64 a1 a1)) (patch (/.f64 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (sqrt 2)) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4))))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4))))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
Calls

9 calls:

TimeVariablePointExpression
17.0ms
th
@-inf
((/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a2 (sqrt 2)) (sqrt 2) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/ (cos th) (sqrt 2)) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (sqrt 2)) (+ (* a2 (/ a2 (* a1 a1))) 1) (- (* a2 a2) (* a1 a1)) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (/ 1 (cos th)) (/ (* a1 a1) (sqrt 2)) (cos th) (/ a2 (* a1 a1)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2)))
6.0ms
a2
@inf
((/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a2 (sqrt 2)) (sqrt 2) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/ (cos th) (sqrt 2)) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (sqrt 2)) (+ (* a2 (/ a2 (* a1 a1))) 1) (- (* a2 a2) (* a1 a1)) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (/ 1 (cos th)) (/ (* a1 a1) (sqrt 2)) (cos th) (/ a2 (* a1 a1)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2)))
6.0ms
th
@0
((/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a2 (sqrt 2)) (sqrt 2) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/ (cos th) (sqrt 2)) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (sqrt 2)) (+ (* a2 (/ a2 (* a1 a1))) 1) (- (* a2 a2) (* a1 a1)) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (/ 1 (cos th)) (/ (* a1 a1) (sqrt 2)) (cos th) (/ a2 (* a1 a1)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2)))
6.0ms
th
@inf
((/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a2 (sqrt 2)) (sqrt 2) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/ (cos th) (sqrt 2)) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (sqrt 2)) (+ (* a2 (/ a2 (* a1 a1))) 1) (- (* a2 a2) (* a1 a1)) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (/ 1 (cos th)) (/ (* a1 a1) (sqrt 2)) (cos th) (/ a2 (* a1 a1)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2)))
6.0ms
a1
@inf
((/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a2 (sqrt 2)) (sqrt 2) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/ (cos th) (sqrt 2)) (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (sqrt 2)) (+ (* a2 (/ a2 (* a1 a1))) 1) (- (* a2 a2) (* a1 a1)) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (/ 1 (cos th)) (/ (* a1 a1) (sqrt 2)) (cos th) (/ a2 (* a1 a1)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2)))

simplify314.0ms (2.6%)

Memory
33.4MiB live, 223.5MiB allocated
Algorithm
egg-herbie
Rules
11 314×lower-fma.f64
11 314×lower-fma.f32
6 034×lower-*.f64
6 034×lower-*.f32
3 672×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03588422
112367720
247457466
081247065
Stop Event
iter limit
node limit
Counts
552 → 552
Calls
Call 1
Inputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (pow 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 a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (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 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 a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (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 a2 2) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(pow a2 2)
(+ (* -1 (pow a1 2)) (pow a2 2))
(+ (* -1 (pow a1 2)) (pow a2 2))
(+ (* -1 (pow a1 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) (- (* -1 (* (pow a1 2) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (* (pow a1 2) (- (* (pow a1 2) (- (* (pow a1 2) (- (/ (cos th) (* (pow a2 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a2 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a2 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(* (pow a2 6) (cos th))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(pow a2 6)
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(* (pow a2 4) (sqrt 2))
(+ (* -1 (* (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2)))
(+ (* (pow a1 2) (+ (* -1 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2)))
(+ (* (pow a1 2) (+ (* -1 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2)))
(/ (* (pow a1 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) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(* (pow a1 2) (+ 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 a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (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))
(* (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)) (sqrt 2))
(* (pow 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)))))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(* -1 (pow a1 2))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(* (pow a1 6) (cos th))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(pow a1 6)
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(* (pow a1 4) (sqrt 2))
(* (pow a1 4) (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(/ (* (pow a1 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) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(* (pow a1 2) (+ 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 a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (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))
(* (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)) (sqrt 2))
(* (pow 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)))))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(* -1 (pow a1 2))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(* (pow a1 6) (cos th))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(pow a1 6)
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(* (pow a1 4) (sqrt 2))
(* (pow a1 4) (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(/ (+ (pow a1 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))))
(+ (/ (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) (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))))
(/ 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)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+ (* -1/2 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(+ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (* 1/24 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))))))
(+ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* 1/24 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))))))
(+ (/ (pow a1 2) (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) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+ (pow a1 6) (pow a2 6))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (+ (pow a1 6) (pow a2 6)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* 1/24 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))))) (+ (pow a1 6) (pow a2 6)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (* 1/24 (+ (pow a1 6) (pow a2 6))))))) (+ (pow a1 6) (pow a2 6)))
1
(+ 1 (* 1/2 (pow th 2)))
(+ 1 (* (pow th 2) (+ 1/2 (* 5/24 (pow th 2)))))
(+ 1 (* (pow th 2) (+ 1/2 (* (pow th 2) (+ 5/24 (* 61/720 (pow th 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) (+ (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 a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (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) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(cos th)
(cos th)
(cos th)
(cos th)
(/ (* (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 a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (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) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(cos th)
(cos th)
(cos th)
(cos th)
(/ (* (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 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 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)
(pow a2 2)
(pow a2 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 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)))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (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 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 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 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)))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(* -1 (pow a1 2))
(- (pow a2 2) (pow a1 2))
(- (pow a2 2) (pow a1 2))
(- (pow a2 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 a2 2) (- (* -1 (* (pow a2 2) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(+ (* (pow a2 2) (- (* (pow a2 2) (- (* (pow a2 2) (- (/ (cos th) (* (pow a1 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a1 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a1 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(* (pow a1 6) (cos th))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(pow a1 6)
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(* (pow a1 4) (sqrt 2))
(+ (* -1 (* (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* (pow a1 4) (sqrt 2)))
(+ (* (pow a1 4) (sqrt 2)) (* (pow a2 2) (+ (* -1 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (sqrt 2)))))
(+ (* (pow a1 4) (sqrt 2)) (* (pow a2 2) (+ (* -1 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 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 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)
(* (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) (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) (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))
(/ (* (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))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow 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) (pow a1 2))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(* (pow a2 6) (cos th))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(pow a2 6)
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(* (pow a2 4) (sqrt 2))
(* (pow a2 4) (+ (sqrt 2) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))
(/ (* (pow a2 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 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)
(* (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) (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) (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))
(/ (* (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))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow 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) (pow a1 2))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(* (pow a2 6) (cos th))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(pow a2 6)
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(/ a2 (pow a1 2))
(* (pow a2 4) (sqrt 2))
(* (pow a2 4) (+ (sqrt 2) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))
Outputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a2 2) (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 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(/ (pow 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 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a2 2) (pow a1 2))
(/.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 a1 a1))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 a1 a1))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 a1 a1))
(pow a2 2)
(*.f64 a2 a2)
(+ (* -1 (pow a1 2)) (pow a2 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(+ (* -1 (pow a1 2)) (pow a2 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(+ (* -1 (pow a1 2)) (pow a2 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (- (* -1 (* (pow a1 2) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (- (* (pow a1 2) (- (* (pow a1 2) (- (/ (cos th) (* (pow a2 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a2 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a2 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* (pow a2 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(pow a2 6)
(pow.f64 a2 #s(literal 6 binary64))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 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)))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(* (pow a2 4) (sqrt 2))
(*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (* (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(+ (* (pow a1 2) (+ (* -1 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(+ (* (pow a1 2) (+ (* -1 (* (pow a2 2) (sqrt 2))) (* (pow a1 2) (sqrt 2)))) (* (pow a2 4) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #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 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(pow a1 2)
(*.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) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (/ (pow a2 2) (pow a1 2)))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(* -1 (pow a1 2))
(neg.f64 (*.f64 a1 a1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(/ (pow a1 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)))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(* (pow a1 4) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(* (pow a1 4) (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #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 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(pow a1 2)
(*.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) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (/ (pow a2 2) (pow a1 2)))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(* -1 (pow a1 2))
(neg.f64 (*.f64 a1 a1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(/ (pow a1 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)))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(* (pow a1 4) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(* (pow a1 4) (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))))
(* (pow a1 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 4) (sqrt 2)) (pow a1 4)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (/.f64 (*.f64 th (*.f64 th (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 th th) (fma.f64 (/.f64 (*.f64 th (*.f64 th (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (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 #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)))))
(+ (* (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 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* (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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) (fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))))))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (/.f64 (*.f64 th (*.f64 th (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 th th) (fma.f64 (/.f64 (*.f64 th (*.f64 th (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(/ 1 (sqrt 2))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(fma.f64 (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(+ (* -1/2 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 th th)) #s(literal -1/2 binary64) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(+ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (* 1/24 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))))))
(fma.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (*.f64 th th)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))))
(+ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* 1/24 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))))))
(fma.f64 th (*.f64 th (fma.f64 (*.f64 a1 a1) (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (*.f64 th th)) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (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 #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)))))
(+ (* (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 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* (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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) (fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))))))))
(/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(*.f64 (*.f64 a1 a1) (fma.f64 (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(fma.f64 (*.f64 a1 a1) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(fma.f64 (*.f64 a1 a1) (fma.f64 (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 th th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 th th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (fma.f64 (*.f64 th th) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 th th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (+ (pow a1 6) (pow a2 6)))
(*.f64 (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* 1/24 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))))) (+ (pow a1 6) (pow a2 6)))
(+.f64 (fma.f64 (*.f64 th th) (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 a1 #s(literal 6 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (* 1/24 (+ (pow a1 6) (pow a2 6))))))) (+ (pow a1 6) (pow a2 6)))
(fma.f64 (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (*.f64 th th) (*.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 th th)) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 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/2 (* 5/24 (pow th 2)))))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 5/24 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (+ 1/2 (* (pow th 2) (+ 5/24 (* 61/720 (pow th 2)))))))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 61/720 binary64) #s(literal 5/24 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 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) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (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) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (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) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a1 2) (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 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(/ (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 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ 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) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
1
#s(literal 1 binary64)
(+ 1 (/ (pow a2 2) (pow a1 2)))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(* -1 (pow a1 2))
(neg.f64 (*.f64 a1 a1))
(- (pow a2 2) (pow a1 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(- (pow a2 2) (pow a1 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(- (pow a2 2) (pow a1 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a2 2) (- (* -1 (* (pow a2 2) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a2 2) (- (* (pow a2 2) (- (* (pow a2 2) (- (/ (cos th) (* (pow a1 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a1 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a1 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* (pow a1 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(* (pow a1 4) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(+ (* -1 (* (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* (pow a1 4) (sqrt 2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (neg.f64 a2) (*.f64 a1 a1))))
(+ (* (pow a1 4) (sqrt 2)) (* (pow a2 2) (+ (* -1 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (sqrt 2)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(+ (* (pow a1 4) (sqrt 2)) (* (pow a2 2) (+ (* -1 (* (pow a1 2) (sqrt 2))) (* (pow a2 2) (sqrt 2)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(pow a2 2)
(*.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) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ 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) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (pow a2 2) (pow a1 2))
(/.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(pow a2 6)
(pow.f64 a2 #s(literal 6 binary64))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(* (pow a2 4) (sqrt 2))
(*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 4) (+ (sqrt 2) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (fma.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2)))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (fma.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(pow a2 2)
(*.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) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ 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) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (pow a2 2) (pow a1 2))
(/.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (cos.f64 th) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(pow a2 6)
(pow.f64 a2 #s(literal 6 binary64))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(/ a2 (pow a1 2))
(/.f64 a2 (*.f64 a1 a1))
(* (pow a2 4) (sqrt 2))
(*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 4) (+ (sqrt 2) (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (fma.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2)))))
(* (pow a2 4) (+ (sqrt 2) (+ (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 4)))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (fma.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2)))))

rewrite1.2s (9.9%)

Memory
-19.9MiB live, 1 429.6MiB allocated
Rules
4 648×lower-/.f32
4 630×lower-/.f64
4 284×lower-*.f32
4 258×lower-*.f64
3 348×lower-fma.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
045317
076256
1292231
22202227
08299227
Stop Event
iter limit
node limit
iter limit
Counts
23 → 1 420
Calls
Call 1
Inputs
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.f64 a2 a2)
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 a2 (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))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
(/.f64 a2 (*.f64 a1 a1))
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
Outputs
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.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))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(fma.f64 a1 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (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 #s(literal 1 binary64) (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 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (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 a2) (/.f64 (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 a2) (/.f64 (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 a2) (/.f64 (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 (*.f64 a2 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))))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(neg.f64 (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))
(/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.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 #s(literal 1 binary64) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (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)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 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 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.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)) (*.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 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.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)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.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)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.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))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.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))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (+.f64 (/.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))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (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 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #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 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (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 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (cos.f64 th))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))))) (neg.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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 (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 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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)))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (cos.f64 th) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 (cos.f64 th)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))))
(/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #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 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -1 binary64))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(+.f64 (*.f64 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))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (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) (neg.f64 (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))
(/.f64 (neg.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(pow.f64 (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal -1 binary64))
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(*.f64 (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (neg.f64 a2) (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))))))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (neg.f64 a2) (*.f64 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 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(*.f64 a2 a2)
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(+.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 a1 (/.f64 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 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))) (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 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))) #s(literal 2 binary64))) (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))) #s(literal 2 binary64))) (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (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 (*.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) (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)) (neg.f64 (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (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) (/.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 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 (neg.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)) 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 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (neg.f64 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 #s(literal 1 binary64) 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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) a2)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 a2 a2))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (neg.f64 (*.f64 a2 a2)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 a2 #s(literal 1 binary64)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 a2 (neg.f64 a2)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) a2))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (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)) (*.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 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.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)) 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 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (neg.f64 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) a2)) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (+.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 a2 a2))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 1 binary64))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (neg.f64 (*.f64 a2 a2)))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (neg.f64 a2) a2))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 a2 #s(literal 1 binary64)))) (*.f64 (neg.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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 a2 (neg.f64 a2)))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 #s(literal 1 binary64) a2))) (*.f64 (neg.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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2))) #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 (neg.f64 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (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)) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (neg.f64 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a2)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 a2 a2)))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (neg.f64 a2)))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) a2))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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))))
(/.f64 (fma.f64 a2 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 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 (neg.f64 (/.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) (neg.f64 (/.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 (sqrt.f64 #s(literal 2 binary64)) (*.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) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (neg.f64 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (neg.f64 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #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) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (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) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (neg.f64 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (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)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (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)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (*.f64 a1 a1))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.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 (*.f64 (neg.f64 a2) a2) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 (neg.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 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (*.f64 a1 a1))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.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)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))))
(/.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)) (neg.f64 (/.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) (neg.f64 (/.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)) (sqrt.f64 #s(literal 2 binary64)) (*.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) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 #s(literal 1 binary64)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (neg.f64 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (*.f64 a1 a1))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) 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 (*.f64 #s(literal 1 binary64) a2) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) 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 (*.f64 #s(literal 1 binary64) a2) (neg.f64 (/.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) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) 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 (*.f64 #s(literal 1 binary64) a2) (sqrt.f64 #s(literal 2 binary64)) (*.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) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (neg.f64 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2)))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (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 (*.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) (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)) (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 (neg.f64 (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))) #s(literal 2 binary64))) (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) #s(literal 2 binary64))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))) #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)))
(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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))))
(/.f64 (neg.f64 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (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 (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)))
(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 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.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))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(fma.f64 a1 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (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 #s(literal 1 binary64) (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 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (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 a2) (/.f64 (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 a2) (/.f64 (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 a2) (/.f64 (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 (*.f64 a2 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))))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(neg.f64 (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))
(/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.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 #s(literal 1 binary64) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (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)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 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 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.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)) (*.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 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.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)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.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)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.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))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.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))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (+.f64 (/.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))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (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 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #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 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (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 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (cos.f64 th))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))))) (neg.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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 (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 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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)))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (cos.f64 th) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 (cos.f64 th)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (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)))
(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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(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 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (cos.f64 th))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 1 binary64) (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (cos.f64 th))) (*.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64))) (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (neg.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (neg.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)))) (neg.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)))) (neg.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (*.f64 a1 a1))
(*.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 a1 a1)) (cos.f64 th))
(*.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 a1 (cos.f64 th))) a1)
(*.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) a1) a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (*.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) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (neg.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 a1))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (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 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))
(*.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 1 binary64))
(-.f64 (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64))))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(fma.f64 a2 (*.f64 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 1 binary64))
(fma.f64 (/.f64 a2 (*.f64 a1 a1)) a2 #s(literal 1 binary64))
(fma.f64 (/.f64 a2 (*.f64 a1 a1)) (*.f64 a2 #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64))) (neg.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64))) (neg.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64))) (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)))) (neg.f64 (neg.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(pow.f64 (/.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64))))
(+.f64 (*.f64 a2 a2) (neg.f64 (*.f64 a1 a1)))
(+.f64 (neg.f64 (*.f64 a1 a1)) (*.f64 a2 a2))
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(-.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(-.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(fma.f64 a1 (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 a2 a2 (neg.f64 (*.f64 a1 a1)))
(fma.f64 #s(literal -1 binary64) (*.f64 a1 a1) (*.f64 a2 a2))
(fma.f64 (neg.f64 a1) a1 (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (neg.f64 (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 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) (neg.f64 (*.f64 a1 a1))))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (-.f64 (*.f64 a2 a2) (neg.f64 (*.f64 a1 a1))))
(/.f64 (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 a2 (*.f64 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) (neg.f64 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (neg.f64 (-.f64 (*.f64 a2 a2) (neg.f64 (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))))) (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a1 a1) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (+.f64 a1 a2) (-.f64 a2 a1))
(*.f64 (-.f64 a2 a1) (+.f64 a1 a2))
(*.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(*.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.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))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(fma.f64 a1 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (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 #s(literal 1 binary64) (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 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (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 a2) (/.f64 (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 a2) (/.f64 (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 a2) (/.f64 (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 (*.f64 a2 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))))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(neg.f64 (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))
(/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.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 #s(literal 1 binary64) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (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)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 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 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.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)) (*.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 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.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)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.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)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.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))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.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))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (+.f64 (/.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))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.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 (*.f64 a2 a2) (cos.f64 th))) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (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 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #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 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (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 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.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 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (cos.f64 th))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))))) (neg.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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 (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 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.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)))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (cos.f64 th) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 (cos.f64 th)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 th) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(+.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (cos.f64 th) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)))
(fma.f64 (cos.f64 th) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(fma.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (cos.f64 th) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (cos.f64 th)) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (cos.f64 th))) (neg.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))) (neg.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (cos.f64 th) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (cos.f64 th))
(+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a2 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(fma.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(fma.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) a1 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) a2 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (pow.f64 a1 #s(literal 3/2 binary64)) (pow.f64 (*.f64 a1 (*.f64 a1 a1)) #s(literal 3/2 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 a1)) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 3/2 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (fma.f64 a2 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))) (neg.f64 (neg.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))))
(pow.f64 (/.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64))
(*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(exp.f64 (*.f64 (log.f64 (cos.f64 th)) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (cos.f64 th))))
(/.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 th)))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (neg.f64 (cos.f64 th)))))
(pow.f64 (cos.f64 th) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 1 binary64))
(pow.f64 (neg.f64 (neg.f64 (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (cos.f64 th) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 th) (cos.f64 th)) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (cos.f64 th))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(*.f64 (pow.f64 (cos.f64 th) #s(literal -1/2 binary64)) (pow.f64 (cos.f64 th) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(neg.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #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 (*.f64 a1 a1) (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 (neg.f64 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 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 (neg.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(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 #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 (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 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(exp.f64 (*.f64 (log.f64 (cos.f64 th)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (cos.f64 th)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 (log.f64 (cos.f64 th)) #s(literal -1 binary64))))
(cos.f64 th)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 1 binary64)))
(/.f64 (cos.f64 th) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (cos.f64 th))) #s(literal 1 binary64))
(pow.f64 (cos.f64 th) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 th))
(*.f64 (cos.f64 th) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 th)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 #s(literal -1 binary64) (pow.f64 (neg.f64 (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (cos.f64 th) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (cos.f64 th) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 a1 a1) a2)) #s(literal -1 binary64)))
(neg.f64 (/.f64 a2 (neg.f64 (*.f64 a1 a1))))
(neg.f64 (/.f64 (neg.f64 a2) (*.f64 a1 a1)))
(/.f64 a2 (*.f64 a1 a1))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) a2))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a1 a1) a2) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 a1 (/.f64 a2 a1)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 a1 a1) a2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 a1 a1) a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 a1 a1) a2) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 a1 (/.f64 a2 a1))))
(/.f64 (neg.f64 a2) (neg.f64 (*.f64 a1 a1)))
(/.f64 (/.f64 a2 a1) a1)
(/.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 (*.f64 a1 a1))))
(/.f64 (neg.f64 (/.f64 a2 a1)) (neg.f64 a1))
(/.f64 (*.f64 a2 #s(literal 1 binary64)) (*.f64 a1 a1))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 (*.f64 a1 a1)))))
(/.f64 (neg.f64 (*.f64 a2 #s(literal 1 binary64))) (neg.f64 (*.f64 a1 a1)))
(/.f64 (neg.f64 (neg.f64 (/.f64 a2 a1))) (neg.f64 (neg.f64 a1)))
(pow.f64 (/.f64 (*.f64 a1 a1) a2) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 a1 a1) a2) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 a1 (/.f64 a2 a1)) #s(literal -1 binary64))
(*.f64 a2 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)))
(*.f64 #s(literal 1 binary64) (/.f64 a2 (*.f64 a1 a1)))
(*.f64 (neg.f64 a2) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a1 a1))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) a2)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (pow.f64 (/.f64 #s(literal 1 binary64) a2) #s(literal -1 binary64)))
(*.f64 (/.f64 a2 a1) (/.f64 #s(literal 1 binary64) a1))
(*.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 a2 a1))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (neg.f64 a2) (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))))))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (neg.f64 a2) (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (neg.f64 a2) (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (neg.f64 a2) (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))) (neg.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (neg.f64 a2) (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))))))) (neg.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (neg.f64 a2) (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)) (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (neg.f64 a2) (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (neg.f64 a2) (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1)))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a1 a2) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))

eval300.0ms (2.5%)

Memory
50.9MiB live, 501.5MiB allocated
Compiler

Compiled 71 167 to 3 143 computations (95.6% saved)

prune265.0ms (2.2%)

Memory
-28.1MiB live, 541.4MiB allocated
Pruning

30 alts after pruning (29 fresh and 1 done)

PrunedKeptTotal
New2 225272 252
Fresh12214
Picked415
Done000
Total2 241302 271
Accuracy
100.0%
Counts
2 271 → 30
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.6%
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
99.6%
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
56.7%
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 5/24 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
60.4%
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
98.7%
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
8.9%
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
99.6%
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
99.6%
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
99.3%
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
99.3%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
99.6%
(*.f64 (fma.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 1/2 binary64))
99.6%
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))))
61.7%
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
69.1%
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
61.7%
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
98.6%
(*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
69.2%
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
99.6%
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
69.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
69.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.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)))))
69.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
58.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
69.1%
#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 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
57.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
98.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
37.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
52.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
68.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
43.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
Compiler

Compiled 1 164 to 687 computations (41% saved)

simplify231.0ms (1.9%)

Memory
-9.1MiB live, 268.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 a2 a2)
cost-diff0
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
cost-diff0
(/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff1088
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
cost-diff0
(fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
cost-diff0
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))
cost-diff0
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
cost-diff128
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
cost-diff0
(*.f64 a2 a2)
cost-diff0
(fma.f64 a1 a1 (*.f64 a2 a2))
cost-diff0
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff384
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
cost-diff0
(*.f64 a1 a1)
cost-diff0
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff0
(*.f64 a2 a2)
cost-diff0
(*.f64 (*.f64 a2 a2) (cos.f64 th))
cost-diff384
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
cost-diff7680
(fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
Rules
9 912×lower-fma.f32
9 902×lower-fma.f64
4 204×lower-*.f32
4 174×lower-*.f64
2 092×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
056476
094430
1178389
2327381
3614381
41750381
54580381
67631381
08259376
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(*.f64 a2 a2)
a2
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(*.f64 a1 (*.f64 a1 (cos.f64 th)))
a1
(*.f64 a1 (cos.f64 th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))
th
(*.f64 th #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 a1 a1)
a1
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
(*.f64 a1 (*.f64 a1 a1))
(*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(*.f64 a2 a2)
a2
(*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))
(*.f64 a2 (*.f64 a2 a2))
#s(approx (cos th) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 #s(literal 1 binary64) (cos.f64 th))
#s(literal 1 binary64)
(cos.f64 th)
th
Outputs
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
(*.f64 (cos.f64 th) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(*.f64 a2 a2)
a2
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(*.f64 a1 (*.f64 a1 (cos.f64 th)))
(*.f64 a1 (*.f64 (cos.f64 th) a1))
a1
(*.f64 a1 (cos.f64 th))
(*.f64 (cos.f64 th) a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 #s(literal 1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))
#s(approx (/ 1 (cos th)) (fma.f64 #s(literal 1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
(fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
th
(*.f64 th #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(literal 1 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(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a1 a1) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #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)))))
(fma.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 a1 a1)
a1
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
(*.f64 a1 (*.f64 a1 a1))
(*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(*.f64 a2 a2)
a2
(*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))
(*.f64 a2 (*.f64 a2 a2))
#s(approx (cos th) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a1 a1) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(fma.f64 (*.f64 a1 a1) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (*.f64 (cos.f64 th) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 #s(literal 1 binary64) (cos.f64 th))
#s(literal 1 binary64)
(cos.f64 th)
th

localize148.0ms (1.2%)

Memory
14.6MiB live, 216.1MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.07421875
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
accuracy0.1015625
(/.f64 #s(literal 1 binary64) (cos.f64 th))
accuracy0.21322250976844204
(/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
accuracy0.6141671549832565
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
accuracy0.23040182638991732
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))
accuracy3.9882812500000004
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
accuracy28.105259479794228
#s(approx (cos th) #s(literal 1 binary64))
accuracy48.16829535697745
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.015625
(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy0.07421875
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
accuracy0.21322250976844204
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
accuracy31.226621587343132
#s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))
accuracy0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.18816376953688405
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
accuracy19.633872450520993
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
accuracy53.49544886827771
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.078125
(*.f64 a1 (*.f64 a1 (cos.f64 th)))
accuracy0.09375
(*.f64 a1 (cos.f64 th))
accuracy0.217128759768442
(fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
accuracy0.234375
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
Samples
85.0ms256×0valid
Compiler

Compiled 433 to 47 computations (89.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 59.0ms
ival-mult: 32.0ms (54.1% of total)
ival-div: 11.0ms (18.6% of total)
ival-add: 7.0ms (11.8% of total)
ival-cos: 6.0ms (10.1% of total)
ival-sqrt: 2.0ms (3.4% of total)
ival-sub: 1.0ms (1.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series85.0ms (0.7%)

Memory
1.5MiB live, 117.0MiB allocated
Counts
25 → 588
Calls
Call 1
Inputs
#s(alt (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())
#s(alt (*.f64 a2 a2) (patch (*.f64 a2 a2) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 a1 a1 (*.f64 a2 a2)) (patch (fma.f64 a1 a1 (*.f64 a2 a2)) #<representation binary64>) () ())
#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())
#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())
#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())
#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(literal 2 binary64)) (patch (sqrt.f64 #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())
Outputs
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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) (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 a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow 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 a2 2) (taylor 0 a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (* -1 (* (pow a1 2) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (* (pow a1 2) (- (* (pow a1 2) (- (/ (cos th) (* (pow a2 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a2 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a2 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor 0 a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor 0 a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor 0 a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor 0 a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (/.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 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) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (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 (* -1 (pow a1 2)) (taylor inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2))))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor inf a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor inf a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor inf a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor inf a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (/.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 -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) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (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 (* -1 (pow a1 2)) (taylor -inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2))))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor -inf a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor -inf a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor -inf a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor -inf a1) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2)) (taylor 0 th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2)) (taylor 0 th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2)))))) (pow a2 2)) (taylor 0 th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* 1/24 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (* 1/24 (+ (pow a1 6) (pow a2 6))))))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor 0 th) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<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 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<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 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<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 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt a1 (taylor 0 th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ a1 (* -1/2 (* a1 (pow th 2)))) (taylor 0 th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ a1 (* (pow th 2) (+ (* -1/2 a1) (* 1/24 (* a1 (pow th 2)))))) (taylor 0 th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ a1 (* (pow th 2) (+ (* -1/2 a1) (* (pow th 2) (+ (* -1/720 (* a1 (pow th 2))) (* 1/24 a1)))))) (taylor 0 th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2)) (taylor 0 th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* 1/24 (* (pow a1 2) (pow th 2))))) (pow a1 2)) (taylor 0 th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (pow th 2))) (* 1/24 (pow a1 2)))))) (pow a1 2)) (taylor 0 th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 1/2 (pow th 2))) (taylor 0 th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (+ 1/2 (* 5/24 (pow th 2))))) (taylor 0 th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (+ 1/2 (* (pow th 2) (+ 5/24 (* 61/720 (pow th 2))))))) (taylor 0 th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 1/2 (pow th 2))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (+ 1/2 (* 5/24 (pow th 2))))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (+ 1/2 (* (pow th 2) (+ 5/24 (* 61/720 (pow th 2))))))) (taylor 0 th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor inf th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor inf th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor inf th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor inf th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf th) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor -inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor -inf th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor -inf th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor -inf th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* a1 (cos th)) (taylor -inf th) (#s(alt (*.f64 a1 (cos.f64 th)) (patch (*.f64 a1 (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf th) (#s(alt (*.f64 a1 (*.f64 a1 (cos.f64 th))) (patch (*.f64 a1 (*.f64 a1 (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (patch #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (cos th)) (taylor -inf th) (#s(alt (/.f64 #s(literal 1 binary64) (cos.f64 th)) (patch (/.f64 #s(literal 1 binary64) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 2))) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor 0 a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor 0 a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor 0 a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor 0 a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<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 a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow 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 (* -1 (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (* -1 (* (pow a2 2) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (* (pow a2 2) (- (* (pow a2 2) (- (/ (cos th) (* (pow a1 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a1 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a1 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor inf a2) (#s(alt (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<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) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (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 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2))))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 2))) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (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 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (patch (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<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 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) (patch (/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (cos.f64 th)) (patch (*.f64 (*.f64 a2 a2) (cos.f64 th)) #<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) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (patch (/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (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 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (patch (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2))))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (patch (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (patch #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #<representation binary64>) () ())) ())
Calls

9 calls:

TimeVariablePointExpression
21.0ms
a1
@-inf
((+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (* a2 a2) (cos th)) (* a2 a2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/ (* a1 a1) (sqrt 2)) (* a1 a1) (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (- (* a2 a2) (* a1 a1)) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* (sqrt 2) (* a1 (* a1 (cos th)))) (* a1 (cos th)) (* a1 (* a1 (cos th))) (sqrt 2) (/ 1 (cos th)) (cos th) (/ 1 (cos th)))
10.0ms
a1
@0
((+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (* a2 a2) (cos th)) (* a2 a2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/ (* a1 a1) (sqrt 2)) (* a1 a1) (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (- (* a2 a2) (* a1 a1)) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* (sqrt 2) (* a1 (* a1 (cos th)))) (* a1 (cos th)) (* a1 (* a1 (cos th))) (sqrt 2) (/ 1 (cos th)) (cos th) (/ 1 (cos th)))
5.0ms
a1
@inf
((+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (* a2 a2) (cos th)) (* a2 a2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/ (* a1 a1) (sqrt 2)) (* a1 a1) (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (- (* a2 a2) (* a1 a1)) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* (sqrt 2) (* a1 (* a1 (cos th)))) (* a1 (cos th)) (* a1 (* a1 (cos th))) (sqrt 2) (/ 1 (cos th)) (cos th) (/ 1 (cos th)))
4.0ms
th
@inf
((+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (* a2 a2) (cos th)) (* a2 a2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/ (* a1 a1) (sqrt 2)) (* a1 a1) (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (- (* a2 a2) (* a1 a1)) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* (sqrt 2) (* a1 (* a1 (cos th)))) (* a1 (cos th)) (* a1 (* a1 (cos th))) (sqrt 2) (/ 1 (cos th)) (cos th) (/ 1 (cos th)))
4.0ms
a2
@-inf
((+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (* a2 a2) (cos th)) (* a2 a2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/ (* a1 a1) (sqrt 2)) (* a1 a1) (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (- (* a2 a2) (* a1 a1)) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* (sqrt 2) (* a1 (* a1 (cos th)))) (* a1 (cos th)) (* a1 (* a1 (cos th))) (sqrt 2) (/ 1 (cos th)) (cos th) (/ 1 (cos th)))

simplify306.0ms (2.5%)

Memory
-5.9MiB live, 436.4MiB allocated
Algorithm
egg-herbie
Rules
13 334×lower-fma.f64
13 334×lower-fma.f32
6 806×lower-*.f64
6 806×lower-*.f32
2 818×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03908120
113617702
253397402
086387008
Stop Event
iter limit
node limit
Counts
588 → 587
Calls
Call 1
Inputs
(* (pow a2 2) (* (cos th) (sqrt 2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(* 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)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (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) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (pow 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 a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a2 2)
(+ (* -1 (pow a1 2)) (pow a2 2))
(+ (* -1 (pow a1 2)) (pow a2 2))
(+ (* -1 (pow a1 2)) (pow a2 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (* (pow a1 2) (- (* -1 (* (pow a1 2) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (* (pow a1 2) (- (* (pow a1 2) (- (* (pow a1 2) (- (/ (cos th) (* (pow a2 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a2 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a2 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(* (pow a2 6) (cos th))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(pow a2 6)
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (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) (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)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 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)))
(* a1 (cos th))
(* a1 (cos th))
(* a1 (cos th))
(* a1 (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (* (cos th) (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) (* (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) (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) (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)
(pow a1 2)
(pow a1 2)
(pow a1 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) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* -1 (pow a1 2))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(* (pow a1 6) (cos th))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(pow a1 6)
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(/ (* (pow a1 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) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(* (pow a1 2) (+ 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) (* (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)))
(* a1 (cos th))
(* a1 (cos th))
(* a1 (cos th))
(* a1 (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (* (cos th) (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) (* (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) (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) (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)
(pow a1 2)
(pow a1 2)
(pow a1 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) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* -1 (pow a1 2))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(* (pow a1 6) (cos th))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(pow a1 6)
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(/ (* (pow a1 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) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(* (pow a1 2) (+ 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) (* (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)))
(* a1 (cos th))
(* a1 (cos th))
(* a1 (cos th))
(* a1 (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(+ (* (pow a1 2) (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)))))))))))))
(* 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))))))))))
(pow a2 2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2)))))) (pow a2 2))
(+ (/ (pow 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) (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))))
(/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+ (pow a1 6) (pow a2 6))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (+ (pow a1 6) (pow a2 6)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* 1/24 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))))) (+ (pow a1 6) (pow a2 6)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (* 1/24 (+ (pow a1 6) (pow a2 6))))))) (+ (pow a1 6) (pow a2 6)))
(/ (+ (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))))
(* (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))))))))
a1
(+ a1 (* -1/2 (* a1 (pow th 2))))
(+ a1 (* (pow th 2) (+ (* -1/2 a1) (* 1/24 (* a1 (pow th 2))))))
(+ a1 (* (pow th 2) (+ (* -1/2 a1) (* (pow th 2) (+ (* -1/720 (* a1 (pow th 2))) (* 1/24 a1))))))
(pow a1 2)
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* 1/24 (* (pow a1 2) (pow th 2))))) (pow a1 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (pow th 2))) (* 1/24 (pow a1 2)))))) (pow a1 2))
1
(+ 1 (* 1/2 (pow th 2)))
(+ 1 (* (pow th 2) (+ 1/2 (* 5/24 (pow th 2)))))
(+ 1 (* (pow th 2) (+ 1/2 (* (pow th 2) (+ 5/24 (* 61/720 (pow th 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)))
1
(+ 1 (* 1/2 (pow th 2)))
(+ 1 (* (pow th 2) (+ 1/2 (* 5/24 (pow th 2)))))
(+ 1 (* (pow th 2) (+ 1/2 (* (pow th 2) (+ 5/24 (* 61/720 (pow th 2)))))))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 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)))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (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 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(/ (* (cos th) (+ (pow a1 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 a1 2) (* (cos th) (sqrt 2)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(* a1 (cos th))
(* a1 (cos th))
(* a1 (cos th))
(* a1 (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(cos th)
(cos th)
(cos th)
(cos th)
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 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)))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (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 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(/ (* (cos th) (+ (pow a1 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 a1 2) (* (cos th) (sqrt 2)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(* a1 (cos th))
(* a1 (cos th))
(* a1 (cos th))
(* a1 (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(* (pow a1 2) (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(cos th)
(cos th)
(cos th)
(cos th)
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(/ 1 (cos th))
(* (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))))
(* 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)))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 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 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 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 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 a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(* -1 (pow a1 2))
(- (pow a2 2) (pow a1 2))
(- (pow a2 2) (pow a1 2))
(- (pow a2 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 a2 2) (- (* -1 (* (pow a2 2) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(+ (* (pow a2 2) (- (* (pow a2 2) (- (* (pow a2 2) (- (/ (cos th) (* (pow a1 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a1 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a1 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(* (pow a1 6) (cos th))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(pow a1 6)
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(/ (* (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 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 a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 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))))
(* 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)))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 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 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) (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 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)
(* (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 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(* (pow a2 6) (cos th))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(pow a2 6)
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(/ (* (pow a2 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 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)
(* (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) (* (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))))
(* 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)))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 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 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) (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 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)
(* (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 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(* (pow a2 6) (cos th))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(pow a2 6)
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(/ (* (pow a2 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 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)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
Outputs
(* (pow a2 2) (* (cos th) (sqrt 2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (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 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow 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 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow 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 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(pow a2 2)
(*.f64 a2 a2)
(+ (* -1 (pow a1 2)) (pow a2 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(+ (* -1 (pow a1 2)) (pow a2 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(+ (* -1 (pow a1 2)) (pow a2 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (- (* -1 (* (pow a1 2) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (- (* (pow a1 2) (- (* (pow a1 2) (- (/ (cos th) (* (pow a2 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a2 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a2 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* (pow a2 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(pow a2 6)
(pow.f64 a2 #s(literal 6 binary64))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow 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 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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 (*.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)))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.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))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.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)))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.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 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (*.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)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (*.f64 a2 a2) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (*.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)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* -1 (pow a1 2))
(neg.f64 (*.f64 a1 a1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(pow a1 2)
(*.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) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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 (*.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)))))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.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))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.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)))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.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 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (*.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)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (*.f64 a2 a2) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (*.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)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))
(* -1 (pow a1 2))
(neg.f64 (*.f64 a1 a1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(pow a1 2)
(*.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) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (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 a2 a2 (*.f64 a1 a1)))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(+ (* (pow a1 2) (sqrt 2)) (+ (* (pow a2 2) (sqrt 2)) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2))))))))))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* (pow a1 2) (sqrt 2)) (+ (* (pow a2 2) (sqrt 2)) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (+ (* -1/2 (* (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (+ (* 1/24 (* (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))))))))))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* 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 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2))))))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (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))))
(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)))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(fma.f64 th (*.f64 th (*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))) (*.f64 a2 a2))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2)))))) (pow a2 2))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 th th))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64))) (*.f64 a2 a2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(+ (* (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 a2 a2 (*.f64 a1 a1))) (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 a2 a2 (*.f64 a1 a1))))
(+ (* (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 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (/.f64 (*.f64 th (*.f64 th (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64))))) (fma.f64 th (/.f64 (*.f64 th (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64))))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(fma.f64 (*.f64 th th) (*.f64 (/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64))))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64))))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(fma.f64 (*.f64 th th) (fma.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 th th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64))))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64))))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (+ (pow a1 6) (pow a2 6)))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* 1/24 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))))) (+ (pow a1 6) (pow a2 6)))
(*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.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 th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (* 1/24 (+ (pow a1 6) (pow a2 6))))))) (+ (pow a1 6) (pow a2 6)))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) (*.f64 th th))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (/.f64 (*.f64 th (*.f64 th (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(* (pow a1 2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(+ (* -1/2 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* (pow a1 2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 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) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(+ (* (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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (*.f64 th (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))))
a1
(+ a1 (* -1/2 (* a1 (pow th 2))))
(fma.f64 a1 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) a1)
(+ a1 (* (pow th 2) (+ (* -1/2 a1) (* 1/24 (* a1 (pow th 2))))))
(fma.f64 (*.f64 th th) (*.f64 a1 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) a1)
(+ a1 (* (pow th 2) (+ (* -1/2 a1) (* (pow th 2) (+ (* -1/720 (* a1 (pow th 2))) (* 1/24 a1))))))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) (*.f64 a1 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 a1 #s(literal -1/2 binary64))) a1)
(pow a1 2)
(*.f64 a1 a1)
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* 1/24 (* (pow a1 2) (pow th 2))))) (pow a1 2))
(fma.f64 th (*.f64 th (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))) (*.f64 a1 a1))
(+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (pow th 2))) (* 1/24 (pow a1 2)))))) (pow a1 2))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 th (*.f64 th (*.f64 a1 a1))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (*.f64 a1 a1) #s(literal -1/2 binary64))) (*.f64 a1 a1))
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/2 (* 5/24 (pow th 2)))))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 5/24 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (+ 1/2 (* (pow th 2) (+ 5/24 (* 61/720 (pow th 2)))))))
(fma.f64 (*.f64 th th) (fma.f64 th (*.f64 th (fma.f64 (*.f64 th th) #s(literal 61/720 binary64) #s(literal 5/24 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (*.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))
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/2 (* 5/24 (pow th 2)))))
(fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 5/24 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (+ 1/2 (* (pow th 2) (+ 5/24 (* 61/720 (pow th 2)))))))
(fma.f64 (*.f64 th th) (fma.f64 th (*.f64 th (fma.f64 (*.f64 th th) #s(literal 61/720 binary64) #s(literal 5/24 binary64))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 a1 #s(literal 4 binary64)))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/ 1 (cos th))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(+ (* (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 a2 a2 (*.f64 a1 a1))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.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 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a1 2) (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 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a1 2) (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 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(* -1 (pow a1 2))
(neg.f64 (*.f64 a1 a1))
(- (pow a2 2) (pow a1 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(- (pow a2 2) (pow a1 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(- (pow a2 2) (pow a1 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a2 2) (- (* -1 (* (pow a2 2) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a2 2) (- (* (pow a2 2) (- (* (pow a2 2) (- (/ (cos th) (* (pow a1 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a1 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a1 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* (pow a1 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a1 2) (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 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(* (pow a2 2) (* (cos th) (sqrt 2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 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 a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 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 a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(pow a2 2)
(*.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 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(/ (* (pow a2 2) (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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(*.f64 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(*.f64 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(pow a2 6)
(pow.f64 a2 #s(literal 6 binary64))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(/ (* (pow a2 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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 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 a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(pow a2 2)
(*.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) (* (cos th) (sqrt 2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 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 a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 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 a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(pow a2 2)
(*.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 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(/ (* (pow a2 2) (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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(*.f64 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(*.f64 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(pow a2 6)
(pow.f64 a2 #s(literal 6 binary64))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(/ (* (pow a2 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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.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 (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 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 a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(pow a2 2)
(*.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)))

rewrite571.0ms (4.7%)

Memory
-10.6MiB live, 916.0MiB allocated
Rules
4 502×lower-*.f32
4 472×lower-*.f64
4 466×lower-/.f32
4 450×lower-/.f64
3 832×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
056338
094308
1340260
22441254
08489251
Stop Event
iter limit
node limit
iter limit
Counts
25 → 677
Calls
Call 1
Inputs
(fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(*.f64 a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 a1)
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))
(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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(*.f64 a1 (cos.f64 th))
(*.f64 a1 (*.f64 a1 (cos.f64 th)))
(sqrt.f64 #s(literal 2 binary64))
#s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))
#s(approx (cos th) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
Outputs
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.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 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(fma.f64 a2 (*.f64 a2 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(fma.f64 a2 (*.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(fma.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(fma.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(fma.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (*.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 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 (*.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 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (cos.f64 th) a1) (*.f64 (cos.f64 th) (*.f64 (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (cos.f64 th) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a2 (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) a1)) a1 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (cos.f64 th)) a1 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (cos.f64 th) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))))
(/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.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 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.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 a2 (cos.f64 th))) (*.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 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.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 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)))))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.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 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))))
(pow.f64 (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.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 a2 (cos.f64 th)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 a2 (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))))))
(*.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.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 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(+.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (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 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64)))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(fma.f64 a2 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.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 (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 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal -2 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.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 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.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 a2 a1) (-.f64 a1 a2))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.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 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.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 a2 a1) (-.f64 a1 a2))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (*.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.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 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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (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 (neg.f64 (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.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 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.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 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.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)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.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)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (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) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (+.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 (*.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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.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 #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))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.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)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.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)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))) (/.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))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))) (/.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))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.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))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.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))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.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))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 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 (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))) (neg.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (cos.f64 th)))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.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 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.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 a2 a1) (-.f64 a1 a2))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal 1/2 binary64))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal -1 binary64)))
(*.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (cos.f64 th)))))) #s(literal -1/2 binary64))
(*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(*.f64 (cos.f64 th) (*.f64 a2 a2))
(*.f64 (*.f64 a2 (cos.f64 th)) a2)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)))
(pow.f64 a2 #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(*.f64 a2 a2)
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(neg.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.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 (neg.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(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 #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 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)))
(pow.f64 a1 #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(*.f64 a1 a1)
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(approx (/ 1 (cos th)) (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)))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (/ 1 (cos th)) (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 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(approx (/ 1 (cos th)) (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))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 (/.f64 #s(approx (/ 1 (cos th)) (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 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 #s(approx (/ 1 (cos th)) (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 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (/.f64 #s(approx (/ 1 (cos th)) (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))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (neg.f64 #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))))
(/.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (/.f64 (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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (*.f64 #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (neg.f64 #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (*.f64 (/.f64 #s(approx (/ 1 (cos th)) (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))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (/.f64 #s(approx (/ 1 (cos th)) (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))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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)) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.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 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (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 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (fma.f64 a2 a2 (*.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))) (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) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.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)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a2 a1) (-.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 a2 a1) (-.f64 a1 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (*.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 a2 a1) (-.f64 a1 a2)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (neg.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(pow.f64 (/.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))))
(*.f64 (/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (+.f64 a2 a1) (*.f64 (-.f64 a2 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (+.f64 a2 a1) (*.f64 (-.f64 a2 a1) (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 a2 a1) (*.f64 (-.f64 a2 a1) (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 a2 a1) (*.f64 (-.f64 a2 a1) (*.f64 a2 a2)))))
(+.f64 (*.f64 a2 a2) (neg.f64 (*.f64 a1 a1)))
(+.f64 (neg.f64 (*.f64 a1 a1)) (*.f64 a2 a2))
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(-.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1))))) (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(-.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(fma.f64 a2 a2 (neg.f64 (*.f64 a1 a1)))
(fma.f64 a1 (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 #s(literal -1 binary64) (*.f64 a1 a1) (*.f64 a2 a2))
(fma.f64 (neg.f64 a1) a1 (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (neg.f64 (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (neg.f64 (*.f64 a1 a1))))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (-.f64 (*.f64 a2 a2) (neg.f64 (*.f64 a1 a1))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (neg.f64 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (neg.f64 (-.f64 (*.f64 a2 a2) (neg.f64 (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1)))) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (neg.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 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 (fma.f64 a2 a2 (*.f64 a1 a1)))))
(pow.f64 (/.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 #s(literal 1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(*.f64 (-.f64 a2 a1) (+.f64 a2 a1))
(*.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(*.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (/.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64)))))) (neg.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal -1 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 (/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(approx (cos th) #s(literal 1 binary64))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(approx (cos th) #s(literal 1 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) #s(literal -1 binary64)))
(+.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))
(+.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))
(+.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))) #s(approx (cos th) #s(literal 1 binary64))))
(+.f64 (*.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) #s(approx (cos th) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))) #s(approx (cos th) #s(literal 1 binary64))))
(fma.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))
(fma.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))) #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) #s(approx (cos th) #s(literal 1 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) #s(approx (cos th) #s(literal 1 binary64))) (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))
(+.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))
(+.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(fma.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 a1) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))
(fma.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 a2) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) a2 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))) a1 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))
(fma.f64 (pow.f64 a1 #s(literal 3/2 binary64)) (pow.f64 (*.f64 a1 (*.f64 a1 a1)) #s(literal 3/2 binary64)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))
(fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 a1)) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 3/2 binary64)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (fma.f64 a2 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64))
(*.f64 (fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1)))))))))
(*.f64 (*.f64 (fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (neg.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))
(/.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 (cos.f64 th)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))))
(/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) (neg.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (neg.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.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))) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))) #s(literal -1 binary64)))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(*.f64 a1 (*.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (cos.f64 th) a1))
(*.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 (sqrt.f64 #s(literal 2 binary64)) a1) (cos.f64 th)) a1)
(*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (cos.f64 th))
(*.f64 (cos.f64 th) a1)
(*.f64 a1 (cos.f64 th))
(*.f64 (cos.f64 th) (*.f64 a1 a1))
(*.f64 a1 (*.f64 (cos.f64 th) a1))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(*.f64 (*.f64 a1 a1) (cos.f64 th))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
#s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64)))
#s(approx (cos th) #s(literal 1 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 th)) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (cos.f64 th))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (cos.f64 th))))
(/.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 th)))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (neg.f64 (cos.f64 th)))))
(pow.f64 (cos.f64 th) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 1 binary64))
(pow.f64 (neg.f64 (neg.f64 (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (cos.f64 th) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 th) (cos.f64 th)) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (cos.f64 th))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(*.f64 (pow.f64 (cos.f64 th) #s(literal -1/2 binary64)) (pow.f64 (cos.f64 th) #s(literal -1/2 binary64)))

eval233.0ms (1.9%)

Memory
34.6MiB live, 406.9MiB allocated
Compiler

Compiled 45 898 to 2 435 computations (94.7% saved)

prune189.0ms (1.6%)

Memory
-11.6MiB live, 494.6MiB allocated
Pruning

29 alts after pruning (27 fresh and 2 done)

PrunedKeptTotal
New1 461181 479
Fresh15924
Picked415
Done011
Total1 480291 509
Accuracy
100.0%
Counts
1 509 → 29
Alt Table
Click to see full alt table
StatusAccuracyProgram
96.3%
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* a1 (* a1 (cos th))) (*.f64 a1 a1)))) #s(literal 2 binary64))
12.2%
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
8.6%
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))
0.9%
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
98.7%
(/.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
69.2%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
69.1%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
99.6%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
69.1%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
61.7%
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
61.7%
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
98.7%
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
98.6%
(*.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)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
61.7%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
98.7%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
69.1%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
99.6%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
69.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
69.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.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)))))
58.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
69.1%
#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 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
37.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
68.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
13.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
13.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
13.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
43.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
Compiler

Compiled 1 093 to 632 computations (42.2% saved)

simplify285.0ms (2.4%)

Memory
-12.1MiB live, 298.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 a1 a1)
cost-diff0
(fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
cost-diff0
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))
cost-diff0
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
cost-diff704
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
cost-diff1600
(fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
cost-diff0
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
cost-diff0
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
cost-diff320
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
cost-diff0
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
cost-diff0
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
cost-diff0
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))
cost-diff0
(cos.f64 th)
cost-diff0
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
cost-diff0
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
Rules
11 120×lower-fma.f32
11 110×lower-fma.f64
5 656×lower-*.f32
5 616×lower-*.f64
2 578×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
066645
0107587
1234543
2559535
31546525
42935512
55186491
66800491
08219484
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(cos.f64 th)
th
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))
#s(literal 1/2 binary64)
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 th th))
#s(literal 1/2 binary64)
(*.f64 th th)
th
#s(literal -1/2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
a1
(fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(*.f64 a2 a2)
a2
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a1 a1)
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #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 a1 a1)
a1
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
(*.f64 a1 (*.f64 a1 a1))
(*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(*.f64 a2 a2)
a2
(*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))
(*.f64 a2 (*.f64 a2 a2))
#s(approx (cos th) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1)))))
(*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))
#s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1)))
(neg.f64 (*.f64 a1 a1))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(cos.f64 th)
th
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))
#s(literal 1/2 binary64)
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 th (*.f64 th #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 th (*.f64 th #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 th (*.f64 th #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 th th))
#s(literal 1/2 binary64)
(*.f64 th th)
th
#s(literal -1/2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
a1
(fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 (/.f64 a2 a1) a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 a2)
a2
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a1 a1)
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #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)))))
(fma.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 a1 a1)
a1
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
(*.f64 a1 (*.f64 a1 a1))
(*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 a2 a2)
a2
(*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))
(*.f64 a2 (*.f64 a2 a2))
#s(approx (cos th) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))
#s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1)))
(neg.f64 (*.f64 a1 a1))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

localize194.0ms (1.6%)

Memory
-0.8MiB live, 286.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.23040182638991732
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))
accuracy28.105259479794228
#s(approx (cos th) #s(literal 1 binary64))
accuracy48.16829535697745
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
accuracy59.51138833762486
#s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1)))
accuracy6.391804800016497
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
accuracy7.822058692315259
(fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
accuracy15.254915460665032
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
accuracy19.633872450520993
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
accuracy0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.213222509768442
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
accuracy2.9007090013482375
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
accuracy24.835897611050655
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
accuracy0.125
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
accuracy0.4453125
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy19.633872450520993
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
accuracy53.49544886827771
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
accuracy0
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
accuracy0.00390625
(*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))
accuracy0.0625
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
accuracy0.217128759768442
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))
Samples
102.0ms256×0valid
Compiler

Compiled 519 to 59 computations (88.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 72.0ms
ival-mult: 40.0ms (55.9% of total)
ival-div: 12.0ms (16.8% of total)
ival-add: 8.0ms (11.2% of total)
ival-cos: 7.0ms (9.8% of total)
ival-sqrt: 2.0ms (2.8% of total)
ival-sub: 1.0ms (1.4% of total)
ival-neg: 1.0ms (1.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series92.0ms (0.8%)

Memory
25.6MiB live, 142.8MiB allocated
Counts
25 → 600
Calls
Call 1
Inputs
#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())
#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())
#s(alt (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())
#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())
#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(literal 2 binary64)) (patch (sqrt.f64 #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())
#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())
#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())
Outputs
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ 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 (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* a1 (sqrt 2))) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) a1) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) a1) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) a1) (taylor 0 a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.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 (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (* -1 (* (pow a1 2) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (- (* (pow a1 2) (- (* (pow a1 2) (- (/ (cos th) (* (pow a2 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a2 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a2 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (pow a1 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 (* 1/2 (pow a2 2)) (taylor 0 a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2))) (taylor 0 a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2))) (taylor 0 a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2))) (taylor 0 a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow a1 2)) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor inf a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor 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 (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (taylor inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.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 (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2))))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (pow a1 2)) (taylor inf a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2))))) (taylor inf a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2))))) (taylor inf a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2))))) (taylor inf a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor inf a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a1 2)) (taylor inf a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor inf a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor -inf a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (patch (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor -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 (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))) (taylor -inf a1) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (- (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (- (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (- (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2))))) (taylor -inf a1) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.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 (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2))))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6)))) (taylor -inf a1) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (pow a1 2)) (taylor -inf a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2))))) (taylor -inf a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2))))) (taylor -inf a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2))))) (taylor -inf a1) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a1 2)) (taylor -inf a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1)) (taylor -inf a1) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))))))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))) (taylor 0 th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))) (taylor 0 th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (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 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2)))))))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))) (* (pow th 2) (+ (* 1/2 (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* -1/2 (* (pow a2 2) (sqrt 2))))) (* (pow th 2) (+ (* 1/2 (* (pow th 2) (+ (* -1/720 (* (pow a1 2) (sqrt 2))) (* -1/720 (* (pow a2 2) (sqrt 2)))))) (* 1/2 (+ (* 1/24 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a2 2) (sqrt 2)))))))))) (taylor 0 th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor 0 th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* 1/24 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (* 1/24 (+ (pow a1 6) (pow a2 6))))))) (+ (pow a1 6) (pow a2 6))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<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) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (pow th 2)) (taylor inf th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4)) (taylor inf th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4)) (taylor inf th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4)) (taylor inf th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor inf th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor inf th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor inf th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor inf th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<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) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (pow th 2)) (taylor -inf th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4)) (taylor -inf th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4)) (taylor -inf th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4)) (taylor -inf th) (#s(alt (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor -inf th) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (taylor -inf th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor -inf th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor -inf th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2))))) (taylor -inf th) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 6) (pow a2 6))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) #s(literal 1 binary64)) (patch #s(approx (cos th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2)))) (taylor 0 a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))) (taylor 0 a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ a1 (sqrt 2)) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ a1 (sqrt 2)) (/ (pow a2 2) (* a1 (sqrt 2)))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ a1 (sqrt 2)) (/ (pow a2 2) (* a1 (sqrt 2)))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ a1 (sqrt 2)) (/ (pow a2 2) (* a1 (sqrt 2)))) (taylor 0 a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.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 (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (* -1 (* (pow a2 2) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a2 2) (- (* (pow a2 2) (- (* (pow a2 2) (- (/ (cos th) (* (pow a1 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a1 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a1 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 6) (cos th)) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a1 6) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 6) (pow a2 6)) (taylor 0 a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (pow a1 2)) (taylor 0 a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2))) (taylor 0 a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2))) (taylor 0 a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2))) (taylor 0 a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a1 2)) (taylor 0 a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (- (pow a2 2) (pow a1 2)) (taylor 0 a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (taylor inf a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* a1 (sqrt 2))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.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 (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2))))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (pow a2 2)) (taylor inf a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor inf a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor inf a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor inf a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor inf a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor inf a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (patch (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (sqrt 2))) (taylor -inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))) (taylor -inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* a1 (sqrt 2))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (patch (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (patch (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (patch #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.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 (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2))))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (patch (/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (cos th)) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (patch (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 6) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6)))) (taylor -inf a2) (#s(alt (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (patch (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (pow a2 2)) (taylor -inf a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (patch (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (* (pow a1 2) (sqrt 2))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (patch (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))) (taylor -inf a2) (#s(alt #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) (patch #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))) #<representation binary64>) () ())) ())
Calls

9 calls:

TimeVariablePointExpression
21.0ms
a1
@-inf
((/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (cos th) (* (sqrt 2) (* 1/2 (+ (* a2 a2) (* a1 a1))))) (cos th) (* (sqrt 2) (* 1/2 (+ (* a2 a2) (* a1 a1)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (* (/ a1 (sqrt 2)) a1) (/ a1 (sqrt 2)) (+ (* (* 1/2 (* th th)) -1/2) 1/2) (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (* a1 (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (* a1 a1) (* 1/2 (+ (* a2 a2) (* a1 a1))) (sqrt 2) (/ (* a2 a2) (* (sqrt 2) (* a1 a1))) (- (* a2 a2) (* a1 a1)) (cos th))
7.0ms
a2
@inf
((/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (cos th) (* (sqrt 2) (* 1/2 (+ (* a2 a2) (* a1 a1))))) (cos th) (* (sqrt 2) (* 1/2 (+ (* a2 a2) (* a1 a1)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (* (/ a1 (sqrt 2)) a1) (/ a1 (sqrt 2)) (+ (* (* 1/2 (* th th)) -1/2) 1/2) (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (* a1 (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (* a1 a1) (* 1/2 (+ (* a2 a2) (* a1 a1))) (sqrt 2) (/ (* a2 a2) (* (sqrt 2) (* a1 a1))) (- (* a2 a2) (* a1 a1)) (cos th))
6.0ms
a1
@inf
((/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (cos th) (* (sqrt 2) (* 1/2 (+ (* a2 a2) (* a1 a1))))) (cos th) (* (sqrt 2) (* 1/2 (+ (* a2 a2) (* a1 a1)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (* (/ a1 (sqrt 2)) a1) (/ a1 (sqrt 2)) (+ (* (* 1/2 (* th th)) -1/2) 1/2) (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (* a1 (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (* a1 a1) (* 1/2 (+ (* a2 a2) (* a1 a1))) (sqrt 2) (/ (* a2 a2) (* (sqrt 2) (* a1 a1))) (- (* a2 a2) (* a1 a1)) (cos th))
5.0ms
a1
@0
((/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (cos th) (* (sqrt 2) (* 1/2 (+ (* a2 a2) (* a1 a1))))) (cos th) (* (sqrt 2) (* 1/2 (+ (* a2 a2) (* a1 a1)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (* (/ a1 (sqrt 2)) a1) (/ a1 (sqrt 2)) (+ (* (* 1/2 (* th th)) -1/2) 1/2) (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (* a1 (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (* a1 a1) (* 1/2 (+ (* a2 a2) (* a1 a1))) (sqrt 2) (/ (* a2 a2) (* (sqrt 2) (* a1 a1))) (- (* a2 a2) (* a1 a1)) (cos th))
5.0ms
a2
@0
((/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (cos th) (* (sqrt 2) (* 1/2 (+ (* a2 a2) (* a1 a1))))) (cos th) (* (sqrt 2) (* 1/2 (+ (* a2 a2) (* a1 a1)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (* (/ a1 (sqrt 2)) a1) (/ a1 (sqrt 2)) (+ (* (* 1/2 (* th th)) -1/2) 1/2) (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (* a1 (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/ (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))) (* (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (cos th)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))) (* a1 a1) (* 1/2 (+ (* a2 a2) (* a1 a1))) (sqrt 2) (/ (* a2 a2) (* (sqrt 2) (* a1 a1))) (- (* a2 a2) (* a1 a1)) (cos th))

simplify421.0ms (3.5%)

Memory
-24.9MiB live, 492.3MiB allocated
Algorithm
egg-herbie
Rules
17 092×lower-fma.f64
17 092×lower-fma.f32
5 840×lower-*.f64
5 840×lower-*.f32
4 460×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03559427
112518974
250448718
083308252
Stop Event
iter limit
node limit
Counts
600 → 600
Calls
Call 1
Inputs
(* 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 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 a2 2) (sqrt 2)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (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) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (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)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 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 a2 2) (* a1 (sqrt 2)))
(/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) a1)
(/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) a1)
(/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) a1)
(/ (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 a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (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) (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) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (* (pow a1 2) (- (* -1 (* (pow a1 2) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (* (pow a1 2) (- (* (pow a1 2) (- (* (pow a1 2) (- (/ (cos th) (* (pow a2 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a2 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a2 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(* (pow a2 6) (cos th))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(pow a2 6)
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(* 1/2 (pow a2 2))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(pow a2 2)
(+ (* -1 (pow a1 2)) (pow a2 2))
(+ (* -1 (pow a1 2)) (pow a2 2))
(+ (* -1 (pow a1 2)) (pow a2 2))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(/ (* (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) (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))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (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)))))
(* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(* (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(/ a1 (sqrt 2))
(* a1 (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* a1 (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* a1 (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (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) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(* (pow a1 6) (cos th))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(pow a1 6)
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(* 1/2 (pow a1 2))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(* -1 (pow a1 2))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(/ (* (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) (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))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (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)))))
(* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(* (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(/ a1 (sqrt 2))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2)))))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2)))))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (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) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(* (pow a1 6) (cos th))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(pow a1 6)
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(* 1/2 (pow a1 2))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(* -1 (pow a1 2))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(* 1/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 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))
1
(+ 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)))
(+ (/ (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))))
1/2
(+ 1/2 (* -1/4 (pow th 2)))
(+ 1/2 (* -1/4 (pow th 2)))
(+ 1/2 (* -1/4 (pow th 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 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(+ (/ (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 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+ (pow a1 6) (pow a2 6))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (+ (pow a1 6) (pow a2 6)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* 1/24 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))))) (+ (pow a1 6) (pow a2 6)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (* 1/24 (+ (pow a1 6) (pow a2 6))))))) (+ (pow a1 6) (pow a2 6)))
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)))
(* 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 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(cos th)
(cos th)
(cos th)
(cos th)
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(* -1/4 (pow th 2))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(* 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/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(cos th)
(cos th)
(cos th)
(cos th)
(* 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 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(cos th)
(cos th)
(cos th)
(cos th)
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(* -1/4 (pow th 2))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(* 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/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(cos th)
(cos th)
(cos th)
(cos th)
(* 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 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 a1 2) (sqrt 2)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(/ (* (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 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)))
(* 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)))))
(* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (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)))
(/ a1 (sqrt 2))
(+ (/ a1 (sqrt 2)) (/ (pow a2 2) (* a1 (sqrt 2))))
(+ (/ a1 (sqrt 2)) (/ (pow a2 2) (* a1 (sqrt 2))))
(+ (/ a1 (sqrt 2)) (/ (pow a2 2) (* a1 (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 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 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 a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (* (pow a2 2) (- (* -1 (* (pow a2 2) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(+ (* (pow a2 2) (- (* (pow a2 2) (- (* (pow a2 2) (- (/ (cos th) (* (pow a1 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a1 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a1 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(* (pow a1 6) (cos th))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(pow a1 6)
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(+ (pow a1 6) (pow a2 6))
(* 1/2 (pow a1 2))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(* -1 (pow a1 2))
(- (pow a2 2) (pow a1 2))
(- (pow a2 2) (pow a1 2))
(- (pow a2 2) (pow a1 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) (sqrt 2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(/ (* (pow a2 2) (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 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)))))
(* 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)))))
(* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(/ (pow a2 2) (* a1 (sqrt 2)))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (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) (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 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) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(* (pow a2 6) (cos th))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(pow a2 6)
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* 1/2 (pow a2 2))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(pow a2 2)
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* 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) (sqrt 2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(/ (* (pow a2 2) (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 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)))))
(* 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)))))
(* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(* (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(/ (pow a2 2) (* a1 (sqrt 2)))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (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) (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 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) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(* (pow a2 6) (cos th))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(pow a2 6)
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(* 1/2 (pow a2 2))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(pow a2 2)
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
Outputs
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (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)))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(* (pow a2 2) (sqrt 2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a2 2) (* a1 (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) a1)
(/.f64 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) a1)
(/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) a1)
(/.f64 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) a1)
(/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) a1)
(/.f64 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) a1)
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (- (* -1 (* (pow a1 2) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (- (* (pow a1 2) (- (* (pow a1 2) (- (/ (cos th) (* (pow a2 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a2 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a2 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a2 2) (sqrt 2)))) (/ (cos th) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* (pow a2 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(pow a2 6)
(pow.f64 a2 #s(literal 6 binary64))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 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)
(* 1/2 (pow a2 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(pow a2 2)
(*.f64 a2 a2)
(+ (* -1 (pow a1 2)) (pow a2 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(+ (* -1 (pow a1 2)) (pow a2 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(+ (* -1 (pow a1 2)) (pow a2 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.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)))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.f64 a1 a1)))
(* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a1 2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(* a1 (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* a1 (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* a1 (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(* 1/2 (pow a1 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (fma.f64 (*.f64 a2 a2) (/.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) #s(literal 1/2 binary64))))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (fma.f64 (*.f64 a2 a2) (/.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) #s(literal 1/2 binary64))))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (fma.f64 (*.f64 a2 a2) (/.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) #s(literal 1/2 binary64))))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* -1 (pow a1 2))
(neg.f64 (*.f64 a1 a1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.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)))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.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 (fma.f64 (*.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)))) (*.f64 a1 a1)))
(* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a1 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a1 2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2)))))
(fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2)))))
(fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2)))))
(fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2))) (pow a1 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (- (+ (* -1 (/ (* (pow a2 2) (+ (* -1 (/ (* (pow a2 4) (cos th)) (sqrt 2))) (/ (* (pow a2 4) (cos th)) (sqrt 2)))) (pow a1 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))) (/ (* (pow a2 4) (cos th)) (* (pow a1 4) (sqrt 2)))))))
(*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a1 6) (+ (cos th) (/ (* (pow a2 6) (cos th)) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (/ (pow a2 6) (pow a1 6))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(* 1/2 (pow a1 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (fma.f64 (*.f64 a2 a2) (/.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) #s(literal 1/2 binary64))))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (fma.f64 (*.f64 a2 a2) (/.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) #s(literal 1/2 binary64))))
(* (pow a1 2) (+ 1/2 (* 1/2 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (fma.f64 (*.f64 a2 a2) (/.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) #s(literal 1/2 binary64))))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* -1 (pow a1 2))
(neg.f64 (*.f64 a1 a1))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a1 2) (- (/ (pow a2 2) (pow a1 2)) 1))
(*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal -1 binary64)))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* 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 (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)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (fma.f64 (*.f64 th th) #s(literal 1/48 binary64) #s(literal -1/4 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (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 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))
(fma.f64 (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)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (fma.f64 (*.f64 th th) #s(literal 1/48 binary64) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 th th) #s(literal -1/1440 binary64) #s(literal 1/48 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 th (*.f64 th (fma.f64 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 (*.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))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow 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 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 th (*.f64 th #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (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)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (pow th 2)))
(fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (pow th 2)))
(fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))
(+ 1/2 (* -1/4 (pow th 2)))
(fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* 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 (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)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (fma.f64 (*.f64 th th) #s(literal 1/48 binary64) #s(literal -1/4 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (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 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow 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 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 th (*.f64 th #s(literal 1/24 binary64)) #s(literal -1/2 binary64))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (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)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))))
(/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(fma.f64 (*.f64 th th) (/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64))))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64))))) (fma.f64 (/.f64 (*.f64 th (*.f64 th (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64))))) (fma.f64 th (*.f64 th #s(literal 1/24 binary64)) #s(literal -1/2 binary64)) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))) (* 1/24 (/ (+ (pow a1 6) (pow a2 6)) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))))) (+ (/ (pow a1 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4)))) (/ (pow a2 6) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))))
(+.f64 (fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) (*.f64 (/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64))))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64))))))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (+ (pow a1 6) (pow a2 6)))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* 1/24 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))))) (+ (pow a1 6) (pow a2 6)))
(*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.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 th 2) (+ (* -1/2 (+ (pow a1 6) (pow a2 6))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 6) (pow a2 6)))) (* 1/24 (+ (pow a1 6) (pow a2 6))))))) (+ (pow a1 6) (pow a2 6)))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 th (*.f64 th (fma.f64 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 (*.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))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* -1/4 (pow th 2))
(*.f64 #s(literal -1/4 binary64) (*.f64 th th))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(*.f64 (*.f64 th th) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(*.f64 (*.f64 th th) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(*.f64 (*.f64 th th) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(*.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(*.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(*.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* -1/4 (pow th 2))
(*.f64 #s(literal -1/4 binary64) (*.f64 th th))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(*.f64 (*.f64 th th) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(*.f64 (*.f64 th th) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(* (pow th 2) (- (* 1/2 (/ 1 (pow th 2))) 1/4))
(*.f64 (*.f64 th th) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(*.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(*.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/2 (/ (* (sqrt 2) (+ (pow a1 2) (pow a2 2))) (pow th 2)))))
(*.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (+.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))
(/ (* (cos th) (+ (pow a1 6) (pow a2 6))) (* (sqrt 2) (+ (* (pow a2 2) (- (pow a2 2) (pow a1 2))) (pow a1 4))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(* (cos th) (+ (pow a1 6) (pow a2 6)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* 1/2 (* (pow a1 2) (sqrt 2)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(* (pow a1 2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(+ (/ a1 (sqrt 2)) (/ (pow a2 2) (* a1 (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ a1 (sqrt 2)) (/ (pow a2 2) (* a1 (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ a1 (sqrt 2)) (/ (pow a2 2) (* a1 (sqrt 2))))
(fma.f64 a2 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a2 2) (- (* -1 (* (pow a2 2) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* (pow a2 2) (- (* (pow a2 2) (- (* (pow a2 2) (- (/ (cos th) (* (pow a1 4) (sqrt 2))) (+ (* -1 (/ (cos th) (* (pow a1 4) (sqrt 2)))) (* 2 (/ (cos th) (* (pow a1 4) (sqrt 2))))))) (+ (* -1 (/ (cos th) (* (pow a1 2) (sqrt 2)))) (/ (cos th) (* (pow a1 2) (sqrt 2)))))) (* -1 (/ (cos th) (sqrt 2))))) (/ (* (pow a1 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(* (pow a1 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a1 #s(literal 6 binary64)))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(+ (* (pow a1 6) (cos th)) (* (pow a2 6) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(+ (pow a1 6) (pow a2 6))
(+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))
(* 1/2 (pow a1 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+ (* 1/2 (pow a1 2)) (* 1/2 (pow a2 2)))
(*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(* -1 (pow a1 2))
(neg.f64 (*.f64 a1 a1))
(- (pow a2 2) (pow a1 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(- (pow a2 2) (pow a1 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(- (pow a2 2) (pow a1 2))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a2 2) (sqrt 2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a2 2) (* a1 (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 a1 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 a1 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 a1 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(pow a2 6)
(pow.f64 a2 #s(literal 6 binary64))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* 1/2 (pow a2 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (pow a2 2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a2 2) (+ (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2)))) (/ (* (pow a1 2) (* (sqrt 2) (+ 1/2 (* -1/4 (pow th 2))))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))
(* (pow a2 2) (sqrt 2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a2 2) (* a1 (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 a1 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 a1 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(* (pow a2 2) (+ (/ 1 (* a1 (sqrt 2))) (/ a1 (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 a1 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 a2 (fma.f64 a2 (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2))) (pow a2 4))) (/ (cos th) (sqrt 2))) (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 2) (- (+ (* -1 (/ (* (pow a1 2) (+ (* -1 (/ (* (pow a1 4) (cos th)) (sqrt 2))) (/ (* (pow a1 4) (cos th)) (sqrt 2)))) (pow a2 6))) (/ (cos th) (sqrt 2))) (+ (* -1 (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))) (/ (* (pow a1 4) (cos th)) (* (pow a2 4) (sqrt 2)))))))
(*.f64 (*.f64 a2 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(* (pow a2 6) (cos th))
(*.f64 (cos.f64 th) (pow.f64 a2 #s(literal 6 binary64)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(* (pow a2 6) (+ (cos th) (/ (* (pow a1 6) (cos th)) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (cos.f64 th) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)))
(pow a2 6)
(pow.f64 a2 #s(literal 6 binary64))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* (pow a2 6) (+ 1 (/ (pow a1 6) (pow a2 6))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(* 1/2 (pow a2 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(* (pow a2 2) (+ 1/2 (* 1/2 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 a1 a1) (/.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/ (pow a2 2) (* (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (fma.f64 (neg.f64 a1) (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))

rewrite508.0ms (4.2%)

Memory
30.6MiB live, 939.5MiB allocated
Rules
6 590×lower-*.f32
6 550×lower-*.f64
5 658×lower-fma.f32
5 648×lower-fma.f64
3 676×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
066468
0107431
1386397
22870377
09086369
Stop Event
iter limit
node limit
iter limit
Counts
25 → 609
Calls
Call 1
Inputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(cos.f64 th)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #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 a1 a1)
(*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))
(sqrt.f64 #s(literal 2 binary64))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
#s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1)))
#s(approx (cos th) #s(literal 1 binary64))
Outputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(+.f64 (*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (cos.f64 th))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)))
(*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/2 binary64))
(cos.f64 th)
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 a2 a2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 a1 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 a2 a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (*.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 (*.f64 a1 (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)) (*.f64 a1 a1))))
(/.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 (*.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)))))
(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 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 (neg.f64 a1)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a1) (/.f64 a1 (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 #s(literal -1 binary64) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1 binary64)))
(neg.f64 (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)))
(/.f64 (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 (*.f64 a1 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a1 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 a1) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) a1) #s(literal -1 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))
(+.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal -1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1/2 binary64))
(fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(fma.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(fma.f64 (*.f64 th #s(literal 1/2 binary64)) (*.f64 th #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th #s(literal 1/2 binary64))) th #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))) (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal -1/2 binary64)) (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))) #s(literal 1/8 binary64)) (-.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal -1/4 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))) #s(literal 1/8 binary64))) (neg.f64 (-.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))))
(pow.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))) (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal -1/2 binary64)) (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))))))
(*.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal -1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(+.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 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 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))))
(fma.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))))
(fma.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 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 #s(literal -1/2 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 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 (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 th th) #s(literal -1/4 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 th th) #s(literal -1/4 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 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 th (*.f64 th #s(literal -1/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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))))
(fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 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 (*.f64 th th) #s(literal -1/4 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 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) #s(literal -1/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)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1/2 binary64)) (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))))) (*.f64 (*.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 (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 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))) (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))) #s(literal 1/8 binary64))) (-.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal -1/4 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal -1/2 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (-.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)))))
(/.f64 (*.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/4 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 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))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(+.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (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 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(+.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (*.f64 a1 (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 a2 (*.f64 (/.f64 a2 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(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))))
(fma.f64 a1 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (*.f64 a1 a1)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (neg.f64 a1) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) a1) #s(literal -1 binary64)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 a2) (/.f64 a2 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (*.f64 a1 a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (fma.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a2 a2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)))) (*.f64 a1 (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))))) (neg.f64 (*.f64 a1 (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (-.f64 a1 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 a1 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2)))))
(/.f64 (fma.f64 a1 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 a1 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a2 (neg.f64 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (neg.f64 a2)) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 a1 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.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 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a1 a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a1 a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a2 (neg.f64 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a2 (neg.f64 a2)) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a1 a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) a1 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) a1)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a2 a2)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (neg.f64 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a1 a1) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 a1 a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a1 a1) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 a1 a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a2 (neg.f64 a2))))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (neg.f64 a2)) a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a1 a1) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 a1 a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) a1 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) a1))
(/.f64 (fma.f64 (neg.f64 a1) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 a1) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2)))))
(/.f64 (fma.f64 (neg.f64 a1) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.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 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 a1) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.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 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))))
(/.f64 (fma.f64 (neg.f64 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a2 (neg.f64 a2))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 (neg.f64 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (neg.f64 a2)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))))
(/.f64 (fma.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 (neg.f64 a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 1 binary64))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2)))))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 (*.f64 a2 a2)))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 a1 (neg.f64 a1) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 a1)))
(/.f64 (fma.f64 a1 (neg.f64 a1) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 a1)))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 (*.f64 a2 (neg.f64 a2))))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 a2 (neg.f64 a2)) a1))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 a1 (neg.f64 a1) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 a1)))
(/.f64 (+.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 a1) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a2 (neg.f64 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (neg.f64 a2)) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2)))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (*.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 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 (neg.f64 a2))))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (neg.f64 a2)) a1))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 a1)) a1 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 a1 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 a1))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 a1 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (neg.f64 a1)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) a1)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (neg.f64 a1))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (neg.f64 (neg.f64 a1)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a2 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 a2)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 a1))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (neg.f64 a1)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 a1))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (neg.f64 a1)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) #s(literal 1 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) #s(literal 1 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a2 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) #s(literal -1 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (*.f64 a2 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (neg.f64 a1)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 (*.f64 a1 a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 (neg.f64 a1)))) (*.f64 (*.f64 a1 a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 (*.f64 a1 a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 (neg.f64 a1)))) (*.f64 (*.f64 a1 a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (neg.f64 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (neg.f64 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) #s(literal 1 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (neg.f64 a2))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) #s(literal 1 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (neg.f64 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (neg.f64 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) #s(literal -1 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (neg.f64 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a2 (neg.f64 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (neg.f64 a1)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) #s(literal 1 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) #s(literal 1 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) #s(literal -1 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (neg.f64 a1)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 (*.f64 a1 a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 (neg.f64 a1)))) (*.f64 (*.f64 a1 a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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)) a1)))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 #s(literal 1 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (neg.f64 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 #s(literal 1 binary64))) (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 a1 #s(literal 1 binary64))) (*.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 #s(literal -1 binary64))) (*.f64 a1 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 #s(literal 1 binary64)))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (neg.f64 (neg.f64 a1)))) (*.f64 a1 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(pow.f64 (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 a1 (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(*.f64 a1 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(*.f64 a1 (fma.f64 a2 (/.f64 a2 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 a1 (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 a1 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 a1 (neg.f64 a1)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) a1 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (neg.f64 a1) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 #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 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a1 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (*.f64 a1 (-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))))) (*.f64 a1 (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) a1) (+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)))) a1) (*.f64 a1 (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (/.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 (fma.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (/.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 (fma.f64 (*.f64 a1 (neg.f64 a1)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 a1)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (neg.f64 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 a1 (neg.f64 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (neg.f64 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 a1 (neg.f64 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))))))
(/.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (*.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (*.f64 (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(pow.f64 (*.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(literal -1 binary64))
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (fma.f64 a1 (*.f64 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 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(approx (cos th) #s(literal 1 binary64))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(approx (cos th) #s(literal 1 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)))
(+.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(+.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))))
(+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(approx (cos th) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64))))
(fma.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(fma.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(approx (cos th) #s(literal 1 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(approx (cos th) #s(literal 1 binary64))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(fma.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(fma.f64 a1 (*.f64 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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) a2 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) a1 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (pow.f64 a1 #s(literal 3/2 binary64)) (pow.f64 (*.f64 a1 (*.f64 a1 a1)) #s(literal 3/2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (pow.f64 (*.f64 a1 (*.f64 a1 a1)) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 3/2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (fma.f64 a2 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(pow.f64 (/.f64 (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (fma.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))))
(*.f64 (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a1 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)))
(pow.f64 a1 #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(*.f64 a1 a1)
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(+.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))))
(fma.f64 a2 (*.f64 a2 #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))))
(fma.f64 a1 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(fma.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 a1 a1) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))))
(fma.f64 (*.f64 a1 a1) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(fma.f64 (*.f64 a1 a1) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(fma.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 a2) #s(literal 1/2 binary64) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(fma.f64 (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(fma.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) a2) a2 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) a1) a1 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 #s(literal 1/2 binary64)))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1/2 binary64)) (fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 1/2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(neg.f64 (/.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))
(/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal 1 binary64)))
(/.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 (neg.f64 a1)))
(/.f64 (neg.f64 (*.f64 a2 (neg.f64 a2))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(/.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a2 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1) a1)
(/.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)
(pow.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a2 (/.f64 a2 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 a2 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (*.f64 a1 a1))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (*.f64 a1 a1)))
(*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)))
(*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 a2 (neg.f64 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))))
(*.f64 (/.f64 a2 (*.f64 a1 a1)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 a2))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 (/.f64 a2 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) a2)
(*.f64 (/.f64 a2 a1) (/.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (/.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 a2 a1))
(*.f64 (/.f64 a2 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 a1))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal -1 binary64)) (pow.f64 (/.f64 a1 a2) #s(literal -1 binary64)))
#s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1)))
#s(approx (cos th) #s(literal 1 binary64))

eval175.0ms (1.4%)

Memory
27.8MiB live, 446.0MiB allocated
Compiler

Compiled 40 392 to 2 434 computations (94% saved)

prune337.0ms (2.8%)

Memory
-56.3MiB live, 688.5MiB allocated
Pruning

42 alts after pruning (37 fresh and 5 done)

PrunedKeptTotal
New1 374191 393
Fresh41822
Picked235
Done022
Total1 380421 422
Accuracy
100.0%
Counts
1 422 → 42
Alt Table
Click to see full alt table
StatusAccuracyProgram
0.8%
(/.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
12.2%
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
0.9%
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) a2 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
0.9%
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
8.6%
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))
69.2%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
69.1%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
99.6%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
69.1%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
61.7%
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
61.7%
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
98.7%
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
98.6%
(*.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)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
69.1%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (+ (* (* 1/2 (* th th)) -1/2) 1/2) #s(literal 1/2 binary64))))
99.6%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))))
98.7%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
99.6%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
98.7%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* 1/2 (+ (* a2 a2) (* a1 a1))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))))))
14.0%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
61.5%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
61.5%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
14.0%
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
69.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
69.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.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)))))
58.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
69.1%
#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 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
37.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
43.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))))
68.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
13.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
13.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
13.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
13.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
63.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (/.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
44.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (*.f64 a1 a2) (/.f64 a2 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
43.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
43.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
57.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
63.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (fma.f64 a2 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
63.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
Compiler

Compiled 2 474 to 761 computations (69.2% saved)

regimes238.0ms (2%)

Memory
34.2MiB live, 382.5MiB allocated
Counts
84 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (+ (* (* 1/2 (* th th)) -1/2) 1/2) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (fma.f64 a2 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 5/24 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (*.f64 a1 a2) (/.f64 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 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (/.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) 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 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 (/.f64 a2 (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 (*.f64 (neg.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)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.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 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 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (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(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) a2 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* 1/2 (+ (* a2 a2) (* a1 a1))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.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 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 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 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* a1 (* a1 (cos th))) (*.f64 a1 a1)))) #s(literal 2 binary64))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (fma.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 1/2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) #s(literal 2 binary64))
(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))))))
(+.f64 (*.f64 (/.f64 (cos.f64 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 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #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)))
Outputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))))
Calls

8 calls:

71.0ms
(*.f64 a1 a1)
29.0ms
a2
24.0ms
a1
23.0ms
(cos.f64 th)
23.0ms
th
Results
AccuracySegmentsBranch
99.6%1a1
99.6%1a2
99.6%1th
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)

regimes154.0ms (1.3%)

Memory
-26.0MiB live, 268.7MiB allocated
Counts
53 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (+ (* (* 1/2 (* th th)) -1/2) 1/2) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (fma.f64 a2 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 5/24 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (*.f64 a1 a2) (/.f64 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 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (/.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) 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 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 (/.f64 a2 (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 (*.f64 (neg.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)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.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 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 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (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(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) a2 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* 1/2 (+ (* a2 a2) (* a1 a1))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.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 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
Outputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
Calls

8 calls:

37.0ms
a1
23.0ms
(*.f64 a1 a1)
16.0ms
(*.f64 a2 a2)
16.0ms
a2
15.0ms
(cos.f64 th)
Results
AccuracySegmentsBranch
99.6%1a1
99.6%1a2
99.6%1th
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)

regimes136.0ms (1.1%)

Memory
17.7MiB live, 249.0MiB allocated
Counts
52 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (+ (* (* 1/2 (* th th)) -1/2) 1/2) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (fma.f64 a2 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 5/24 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (*.f64 a1 a2) (/.f64 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 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (/.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) 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 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 (/.f64 a2 (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 (*.f64 (neg.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)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.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 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 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (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(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) a2 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* 1/2 (+ (* a2 a2) (* a1 a1))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.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 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
Calls

8 calls:

29.0ms
(*.f64 a1 a1)
18.0ms
a1
16.0ms
a2
15.0ms
th
15.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
98.7%1a1
98.7%1a2
98.7%1th
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)

regimes139.0ms (1.1%)

Memory
-12.0MiB live, 235.4MiB allocated
Counts
47 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (+ (* (* 1/2 (* th th)) -1/2) 1/2) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (fma.f64 a2 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 5/24 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (*.f64 a1 a2) (/.f64 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 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (/.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) 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 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 (/.f64 a2 (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 (*.f64 (neg.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)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.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 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 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (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(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) a2 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* 1/2 (+ (* a2 a2) (* a1 a1))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
Outputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
Calls

8 calls:

27.0ms
a2
27.0ms
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
15.0ms
(*.f64 a2 a2)
14.0ms
a1
14.0ms
(cos.f64 th)
Results
AccuracySegmentsBranch
98.7%1a1
98.7%1a2
98.7%1th
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)

regimes134.0ms (1.1%)

Memory
7.8MiB live, 238.8MiB allocated
Counts
46 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (+ (* (* 1/2 (* th th)) -1/2) 1/2) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (fma.f64 a2 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 5/24 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (*.f64 a1 a2) (/.f64 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 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (/.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) 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 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 (/.f64 a2 (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 (*.f64 (neg.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)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.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 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 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (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(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) a2 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* 1/2 (+ (* a2 a2) (* a1 a1))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))))))
Outputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* 1/2 (+ (* a2 a2) (* a1 a1))) (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))))))
Calls

8 calls:

36.0ms
a1
16.0ms
a2
15.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
14.0ms
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
13.0ms
(cos.f64 th)
Results
AccuracySegmentsBranch
98.7%1a1
98.7%1a2
98.7%1th
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)

regimes138.0ms (1.1%)

Memory
1.9MiB live, 281.4MiB allocated
Counts
45 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (+ (* (* 1/2 (* th th)) -1/2) 1/2) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 #s(approx (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (* (+ (* a2 (/ a2 (* a1 a1))) 1) (* (cos th) (* a1 a1))) (*.f64 (*.f64 a1 a1) (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 th (*.f64 th #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (fma.f64 a2 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (/ 1 (cos th)) (fma.f64 (*.f64 th th) (fma.f64 (*.f64 th th) #s(literal 5/24 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (*.f64 a1 a2) (/.f64 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 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 (/.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) 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 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (fma.f64 a1 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 (/.f64 a2 (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 (*.f64 (neg.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)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 (fma.f64 (/.f64 (*.f64 a1 (*.f64 a2 a2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.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 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 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (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(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) a2 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (neg.f64 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) #s(approx (- (* a2 a2) (* a1 a1)) (*.f64 a1 (neg.f64 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))))
Outputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
Calls

8 calls:

43.0ms
(*.f64 a1 a1)
14.0ms
th
14.0ms
a2
14.0ms
(cos.f64 th)
13.0ms
a1
Results
AccuracySegmentsBranch
69.2%1a2
78.7%2(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
78.7%2(cos.f64 th)
69.2%1(*.f64 a2 a2)
69.2%1a1
69.2%1th
79.2%2(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
69.2%1(*.f64 a1 a1)
Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes15.0ms (0.1%)

Memory
2.1MiB live, 39.6MiB allocated
Counts
11 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (+ (* (* 1/2 (* th th)) -1/2) 1/2) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
Outputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
Calls

3 calls:

6.0ms
(cos.f64 th)
4.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
4.0ms
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Results
AccuracySegmentsBranch
73.9%2(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
73.9%2(cos.f64 th)
74.5%2(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Compiler

Compiled 35 to 23 computations (34.3% saved)

regimes39.0ms (0.3%)

Memory
-3.2MiB live, 83.4MiB allocated
Counts
10 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (+ (* (* 1/2 (* th th)) -1/2) 1/2) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 #s(approx (+ (* a1 (/ (* a2 a2) (* (sqrt 2) (* a1 a1)))) (/ a1 (sqrt 2))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
Outputs
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
Calls

8 calls:

10.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
6.0ms
a2
4.0ms
th
4.0ms
a1
3.0ms
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Results
AccuracySegmentsBranch
69.2%1a1
69.2%1a2
69.2%1th
69.2%1(*.f64 a1 a1)
69.2%1(*.f64 a2 a2)
69.2%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
69.2%1(cos.f64 th)
69.2%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)

regimes29.0ms (0.2%)

Memory
2.7MiB live, 77.5MiB allocated
Counts
8 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(approx (+ (* (* 1/2 (* th th)) -1/2) 1/2) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
Outputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
Calls

8 calls:

5.0ms
th
5.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
3.0ms
a1
3.0ms
a2
3.0ms
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Results
AccuracySegmentsBranch
69.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)))
69.1%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
69.1%1(cos.f64 th)
69.1%1a1
69.1%1a2
69.1%1th
69.1%1(*.f64 a1 a1)
69.1%1(*.f64 a2 a2)
Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes24.0ms (0.2%)

Memory
-14.0MiB live, 68.0MiB allocated
Counts
5 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
Calls

8 calls:

6.0ms
a2
3.0ms
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
2.0ms
a1
2.0ms
th
2.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
68.9%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
68.9%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
68.9%1(cos.f64 th)
68.9%1a1
68.9%1a2
68.9%1th
68.9%1(*.f64 a1 a1)
68.9%1(*.f64 a2 a2)
Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes14.0ms (0.1%)

Memory
4.3MiB live, 43.1MiB allocated
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

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

8 calls:

2.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
2.0ms
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
2.0ms
a1
2.0ms
a2
2.0ms
th
Results
AccuracySegmentsBranch
13.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)))
13.4%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
13.4%1(cos.f64 th)
13.4%1a2
13.4%1(*.f64 a2 a2)
13.4%1a1
13.4%1th
13.4%1(*.f64 a1 a1)
Compiler

Compiled 59 to 40 computations (32.2% saved)

bsearch1.0ms (0%)

Memory
1.7MiB live, 1.7MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-4.8900448425583735e-241
-4.575620072244549e-281
Compiler

Compiled 25 to 18 computations (28% saved)

bsearch0.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-2.4006148348723028e-107
-1.561322711650032e-109
Compiler

Compiled 25 to 18 computations (28% saved)

simplify9.0ms (0.1%)

Memory
26.4MiB live, 26.4MiB allocated
Algorithm
egg-herbie
Rules
38×*-commutative_binary64
+-commutative_binary64
1-exp_binary64
1-exp_binary32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
093521
1116521
Stop Event
saturated
Calls
Call 1
Inputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* 1/2 (+ (* a2 a2) (* a1 a1))) (*.f64 #s(literal 1/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 -375375841440235/938439603600587528746394711938657107663969949193687942084737423845328945327403963493426274822541422606069252398088182827397836333287780407720182613329988145004965865323862822167078543736143176539997470989737828269291292380585577139908076735904949708259328 binary64)) #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))) #s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 (+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) #s(literal -3305279843951243/165263992197562149737978827008192759957101170741070304821162198818601447809077836456297302609928821211897803006255839576064 binary64)) #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))) #s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
Outputs
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (cos.f64 th))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (* 1/2 (+ (* a2 a2) (* a1 a1))) (*.f64 #s(literal 1/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 -375375841440235/938439603600587528746394711938657107663969949193687942084737423845328945327403963493426274822541422606069252398088182827397836333287780407720182613329988145004965865323862822167078543736143176539997470989737828269291292380585577139908076735904949708259328 binary64)) #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))) #s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -375375841440235/938439603600587528746394711938657107663969949193687942084737423845328945327403963493426274822541422606069252398088182827397836333287780407720182613329988145004965865323862822167078543736143176539997470989737828269291292380585577139908076735904949708259328 binary64)) #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))) #s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 (+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) #s(literal -3305279843951243/165263992197562149737978827008192759957101170741070304821162198818601447809077836456297302609928821211897803006255839576064 binary64)) #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))) #s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -3305279843951243/165263992197562149737978827008192759957101170741070304821162198818601447809077836456297302609928821211897803006255839576064 binary64)) #s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) #s(approx (* (* (sqrt 2) (+ (* a2 a2) (* a1 a1))) (+ (* (* 1/2 (* th th)) -1/2) 1/2)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))))) #s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/ 1 (cos th))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 a2) (cos th)) (sqrt 2)) (* (sqrt 2) (* a1 (* a1 (cos th))))) 2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* 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 (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* a2 (/ a2 (sqrt 2))) (/ (* a1 a1) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))

soundness1.8s (14.5%)

Memory
-20.0MiB live, 1 489.9MiB allocated
Rules
34 694×lower-fma.f64
34 694×lower-fma.f32
17 092×lower-fma.f64
17 092×lower-fma.f32
13 334×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03559427
112518974
250448718
083308252
01244
02038
15838
241138
3733138
0843437
03588422
112367720
247457466
081247065
01111498
13431366
212061262
339001233
084281172
056338
094308
1340260
22441254
08489251
045317
076256
1292231
22202227
08299227
066468
0107431
1386397
22870377
09086369
03908120
113617702
253397402
086387008
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
Compiler

Compiled 704 to 369 computations (47.6% saved)

preprocess102.0ms (0.8%)

Memory
26.2MiB live, 227.0MiB allocated
Remove

(abs a2)

(sort a1 a2)

(abs a1)

(abs th)

Compiler

Compiled 984 to 472 computations (52% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...