Migdal et al, Equation (64)

Time bar (total: 8.6s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze0.0ms (0%)

Memory
0.7MiB live, 0.7MiB 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.8s (20.8%)

Memory
6.9MiB live, 1 800.7MiB allocated
Samples
1.3s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.0s
ival-cos: 477.0ms (45.6% of total)
ival-mult: 370.0ms (35.4% of total)
ival-add: 72.0ms (6.9% of total)
ival-sqrt: 60.0ms (5.7% of total)
ival-div: 51.0ms (4.9% of total)
ival-true: 6.0ms (0.6% of total)
exact: 6.0ms (0.6% of total)
ival-assert: 3.0ms (0.3% of total)
Bogosity

explain194.0ms (2.2%)

Memory
-11.6MiB live, 225.6MiB 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
89.0ms512×0valid
Compiler

Compiled 138 to 40 computations (71% saved)

Precisions
Click to see histograms. Total time spent on operations: 71.0ms
ival-mult: 41.0ms (57.8% of total)
ival-cos: 20.0ms (28.2% of total)
ival-sqrt: 4.0ms (5.6% of total)
ival-div: 3.0ms (4.2% of total)
ival-add: 2.0ms (2.8% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

preprocess135.0ms (1.6%)

Memory
8.4MiB live, 47.8MiB 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 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
Symmetry

(abs th)

(abs a2)

(abs a1)

(sort a1 a2)

Compiler

Compiled 22 to 12 computations (45.5% saved)

eval0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated
Compiler

Compiled 3 to 3 computations (0% saved)

prune1.0ms (0%)

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

simplify5.0ms (0.1%)

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

localize85.0ms (1%)

Memory
-22.4MiB live, 58.4MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.00390625
(cos.f64 th)
accuracy0.150722509768442
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
accuracy0.181972509768442
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
accuracy0.7389450195368841
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Samples
52.0ms256×0valid
Compiler

Compiled 58 to 14 computations (75.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 43.0ms
ival-mult: 27.0ms (62.4% of total)
ival-cos: 12.0ms (27.8% of total)
ival-sqrt: 2.0ms (4.6% of total)
ival-div: 1.0ms (2.3% of total)
ival-add: 1.0ms (2.3% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series25.0ms (0.3%)

Memory
-6.3MiB live, 32.7MiB allocated
Counts
5 → 108
Calls
Call 1
Inputs
#s(alt (+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (patch (+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (patch (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #<representation binary64>) () ())
#s(alt (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (patch (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #<representation binary64>) () ())
Outputs
#s(alt (/ (* (pow 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
3.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)))

simplify310.0ms (3.6%)

Memory
18.1MiB live, 331.0MiB 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 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 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 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 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 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 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 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 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 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 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 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 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 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #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 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
(/ (pow a1 2) (sqrt 2))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) a1 a1))
(+ (* (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 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #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 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th)))
(/ 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 #s(literal -1/2 binary64) (*.f64 th th) #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 (sqrt.f64 #s(literal 2 binary64))) th) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #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 (fma.f64 (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) a2 a2))
(+ (* (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 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #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 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.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 (fma.f64 a1 a1 (*.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 (fma.f64 a1 a1 (*.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 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 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 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 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))

rewrite190.0ms (2.2%)

Memory
18.0MiB live, 215.9MiB 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 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (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 (cos.f64 th)))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (fma.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (cos.f64 th))) a1 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 a2 a2))))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 6 binary64)))) (fma.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 4 binary64))))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.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 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (/.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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(*.f64 (pow.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -1 binary64)) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(*.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(*.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(*.f64 (fma.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(*.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -1 binary64))))
(*.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (pow.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(/.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (cos.f64 th))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 (fma.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 4 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 6 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 4 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 6 binary64))) (pow.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -1 binary64))) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 9 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 9 binary64))) (pow.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -1 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 6 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 3 binary64))))
(/.f64 (*.f64 #s(literal -1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1 binary64)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (*.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) #s(literal 1 binary64)) (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.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 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))) (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))))
(/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal -1 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #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 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal -1 binary64)) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 9 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 6 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.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 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) #s(literal 1 binary64))) (*.f64 (/.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 a1 a1))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.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 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (*.f64 a2 a2))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) #s(literal 1 binary64))) (*.f64 (/.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 a2 a2))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (cos.f64 th) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 6 binary64))) (*.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 6 binary64))) (*.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 9 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 9 binary64))) (*.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 6 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 3 binary64)))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))))
(/.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 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(neg.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(fma.f64 (/.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (fma.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (cos.f64 th))) a1 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))) #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #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 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (*.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (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 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 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 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 3 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(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 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) a1) (/.f64 a1 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -2 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 3 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a1 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 a1) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (neg.f64 (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (neg.f64 (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 a2 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (/.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (*.f64 a1 a1) (/.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 a1 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (neg.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))
(+.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (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 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.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 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.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 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a1)
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 a1) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a1 a1) (neg.f64 (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 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) #s(literal -1 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 a1 a1)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 a1 a1)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (pow.f64 (cos.f64 th) #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))))
(/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)))
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(neg.f64 (*.f64 (neg.f64 a1) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(*.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)))
(*.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 (*.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (cos.f64 th)))
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (pow.f64 (cos.f64 th) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (cos.f64 th))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1 binary64))
(/.f64 (/.f64 (neg.f64 (cos.f64 th)) #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))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (neg.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 -1 binary64) (neg.f64 (cos.f64 th)))
(*.f64 #s(literal 1 binary64) (cos.f64 th))
(*.f64 (cos.f64 th) #s(literal 1 binary64))
(neg.f64 (neg.f64 (cos.f64 th)))
(-.f64 #s(literal 0 binary64) (neg.f64 (cos.f64 th)))
(cos.f64 th)
(*.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (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 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (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) (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 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.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 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2)
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a2 a2) (neg.f64 (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 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (pow.f64 (cos.f64 th) #s(literal -1 binary64)))
(/.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(neg.f64 (*.f64 (neg.f64 a2) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))

eval106.0ms (1.2%)

Memory
-23.0MiB live, 135.7MiB allocated
Compiler

Compiled 12 968 to 1 016 computations (92.2% saved)

prune103.0ms (1.2%)

Memory
15.7MiB live, 136.2MiB allocated
Pruning

12 alts after pruning (12 fresh and 0 done)

PrunedKeptTotal
New47812490
Fresh000
Picked101
Done000
Total47912491
Accuracy
100.0%
Counts
491 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.6%
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
99.6%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
99.3%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))))
99.4%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
99.7%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)))
99.7%
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
68.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
54.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
64.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
99.6%
#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)))))
66.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
99.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
Compiler

Compiled 430 to 276 computations (35.8% saved)

simplify250.0ms (2.9%)

Memory
-6.0MiB live, 287.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 a1 a1)
cost-diff0
(fma.f64 a2 a2 (*.f64 a1 a1))
cost-diff0
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
cost-diff0
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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
#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)))))
cost-diff0
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
cost-diff1344
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
cost-diff0
(sqrt.f64 #s(literal 2 binary64))
cost-diff0
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
cost-diff1344
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
cost-diff0
(fma.f64 a2 a2 (*.f64 a1 a1))
cost-diff0
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
cost-diff0
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
cost-diff0
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)))
Rules
19 354×lower-fma.f32
19 344×lower-fma.f64
6 396×lower-*.f32
6 378×lower-*.f64
3 212×lower-+.f64
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
039339
061318
1105318
2196318
3552318
41942309
55036303
66065303
77114303
87615303
97903303
107903303
08892303
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)))
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
#s(literal 2 binary64)
#s(literal -1/2 binary64)
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(cos.f64 th)
th
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
a2
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
(*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
a2
(fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))
(*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th)
(fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))
#s(literal 1/24 binary64)
(*.f64 th th)
th
#s(literal -1/2 binary64)
#s(literal 1 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(*.f64 (pow.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) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
#s(literal 2 binary64)
#s(literal -1/2 binary64)
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(cos.f64 th)
th
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
a2
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)))
(*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
a2
(fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))
(fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))
(*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th)
(*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th)
(fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))
(fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))
#s(literal 1/24 binary64)
(*.f64 th th)
th
#s(literal -1/2 binary64)
#s(literal 1 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
a1
(*.f64 a2 a2)
a2
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

localize112.0ms (1.3%)

Memory
-5.5MiB live, 230.5MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.00390625
(cos.f64 th)
accuracy0.0546875
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
accuracy0.21484375
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
accuracy0.00390625
(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy0.00390625
(cos.f64 th)
accuracy0.158535009768442
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.7389450195368841
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
accuracy0.43359375
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy0.4609375
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy2.739840985088533
(*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)))
accuracy22.849173545805108
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
accuracy0.10546875
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
accuracy0.43359375
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy0.4609375
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy20.29164701982331
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
accuracy0
(*.f64 a1 a1)
accuracy0.00390625
(cos.f64 th)
accuracy0.0546875
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
accuracy0.189785009768442
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)))
Samples
85.0ms256×0valid
Compiler

Compiled 307 to 36 computations (88.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 62.0ms
ival-mult: 28.0ms (44.9% of total)
ival-cos: 9.0ms (14.4% of total)
ival-div: 6.0ms (9.6% of total)
ival-add: 6.0ms (9.6% of total)
const: 4.0ms (6.4% of total)
ival-sqrt: 4.0ms (6.4% of total)
ival-pow: 4.0ms (6.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series57.0ms (0.7%)

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

9 calls:

TimeVariablePointExpression
6.0ms
a1
@-inf
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a1 (sqrt 2)) (sqrt 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (+ (* (* (+ (* 1/24 (* th th)) -1/2) th) th) 1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* a1 a1) (cos th) (/ a2 (sqrt 2)) (* (/ a2 (sqrt 2)) a2) (/ (cos th) (sqrt 2)))
6.0ms
th
@inf
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a1 (sqrt 2)) (sqrt 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (+ (* (* (+ (* 1/24 (* th th)) -1/2) th) th) 1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* a1 a1) (cos th) (/ a2 (sqrt 2)) (* (/ a2 (sqrt 2)) a2) (/ (cos th) (sqrt 2)))
6.0ms
a2
@0
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a1 (sqrt 2)) (sqrt 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (+ (* (* (+ (* 1/24 (* th th)) -1/2) th) th) 1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* a1 a1) (cos th) (/ a2 (sqrt 2)) (* (/ a2 (sqrt 2)) a2) (/ (cos th) (sqrt 2)))
4.0ms
a1
@0
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a1 (sqrt 2)) (sqrt 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (+ (* (* (+ (* 1/24 (* th th)) -1/2) th) th) 1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* a1 a1) (cos th) (/ a2 (sqrt 2)) (* (/ a2 (sqrt 2)) a2) (/ (cos th) (sqrt 2)))
3.0ms
a1
@inf
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a1 (sqrt 2)) (sqrt 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (+ (* (* (+ (* 1/24 (* th th)) -1/2) th) th) 1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* a1 a1) (cos th) (/ a2 (sqrt 2)) (* (/ a2 (sqrt 2)) a2) (/ (cos th) (sqrt 2)))

simplify224.0ms (2.6%)

Memory
3.3MiB live, 285.8MiB allocated
Algorithm
egg-herbie
Rules
17 450×lower-fma.f64
17 450×lower-fma.f32
5 432×lower-*.f64
5 432×lower-*.f32
5 372×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02087140
17206179
227415876
376685730
081155272
Stop Event
iter limit
node limit
Counts
444 → 444
Calls
Call 1
Inputs
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/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)
(+ (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)))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/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)
(+ (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 a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 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)
(pow a1 2)
(pow a1 2)
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(pow a1 2)
(* (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)))))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (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) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/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)
(* (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 a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(pow a1 2)
(* (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)))))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (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) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/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)
(* (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 a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(+ (pow a1 2) (pow a2 2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(+ (/ (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)) (/ (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)) (/ (pow a2 2) (sqrt 2)))
(+ (* -1/2 (* (pow th 2) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (* 1/24 (* (pow th 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)) (/ (pow a2 2) (sqrt 2)))) (* 1/24 (* (pow th 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 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 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
(+ 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 (sqrt 2))
(+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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/24 (* (pow th 4) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (+ (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (+ (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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 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)
(cos th)
(cos th)
(cos th)
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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/24 (* (pow th 4) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (+ (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (+ (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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 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)
(cos th)
(cos th)
(cos th)
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/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)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 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)))
(/ (* (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) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/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) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 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) (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) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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 a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(pow a2 2)
(* (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) (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) (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) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (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 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) (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) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(pow a2 2)
(* (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) (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) (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) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (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 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) (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) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
Outputs
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(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 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a1 2) (sqrt 2))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) a1) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) a1) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) a1) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(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 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a1 2) (sqrt 2))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) a1) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) a1) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) a1) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (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 1/2 binary64))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 th th)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 th th)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* -1/2 (* (pow th 2) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (* 1/24 (* (pow th 2) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (* 1/24 (* (pow th 2) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 th th)))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 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)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(fma.f64 (fma.f64 (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 th (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* 1/24 (* (pow th 4) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 (/.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (+.f64 #s(literal 1/24 binary64) (/.f64 (/.f64 #s(literal -1/2 binary64) th) th))) (pow.f64 th #s(literal 4 binary64)))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (+ (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(*.f64 (fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (+.f64 #s(literal 1/24 binary64) (/.f64 (/.f64 #s(literal -1/2 binary64) th) th)))) (pow.f64 th #s(literal 4 binary64)))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (+ (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(*.f64 (fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (+.f64 #s(literal 1/24 binary64) (/.f64 (/.f64 #s(literal -1/2 binary64) th) th)))) (pow.f64 th #s(literal 4 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* 1/24 (* (pow th 4) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 (/.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (+.f64 #s(literal 1/24 binary64) (/.f64 (/.f64 #s(literal -1/2 binary64) th) th))) (pow.f64 th #s(literal 4 binary64)))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (+ (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(*.f64 (fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (+.f64 #s(literal 1/24 binary64) (/.f64 (/.f64 #s(literal -1/2 binary64) th) th)))) (pow.f64 th #s(literal 4 binary64)))
(* (pow th 4) (+ (* -1/2 (/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow th 2))) (+ (* 1/24 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(*.f64 (fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (+.f64 #s(literal 1/24 binary64) (/.f64 (/.f64 #s(literal -1/2 binary64) th) th)))) (pow.f64 th #s(literal 4 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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) (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) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a1 2) (sqrt 2))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(fma.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) a2) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 a2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) a2) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 a2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) a2) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 a2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) a2) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 a2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) a2) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 a2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)) a1) a2) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 a2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)

rewrite271.0ms (3.1%)

Memory
-22.0MiB live, 497.6MiB allocated
Rules
4 868×lower-fma.f32
4 858×lower-fma.f64
4 776×lower-/.f32
4 768×lower-/.f64
4 346×lower-*.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
039234
061215
1210204
21584204
08528204
Stop Event
iter limit
node limit
iter limit
Counts
20 → 1 591
Calls
Call 1
Inputs
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)))
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
(*.f64 (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 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 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.f64 a2 a2)
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 a1)
(cos.f64 th)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Outputs
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 a1 a2)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 a1)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(*.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (pow.f64 (pow.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th))
(*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 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))))
(pow.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64))) #s(literal 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 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (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 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (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 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #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 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 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 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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)) (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 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.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 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 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) (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)))) (*.f64 (neg.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 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (neg.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 (*.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 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (neg.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))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 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) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.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 (*.f64 (cos.f64 th) 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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 (cos.f64 th) a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.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 (*.f64 (cos.f64 th) 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) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #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 (*.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 (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 (cos.f64 th) a2) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.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 (cos.f64 th) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 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 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (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 #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 (*.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 (*.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 (cos.f64 th) 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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 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 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (neg.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 #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 (*.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 (*.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 (cos.f64 th) a2) a2)))) (*.f64 (neg.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))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 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 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (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 #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 (*.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 (*.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 (cos.f64 th) 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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 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 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (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 (cos.f64 th) a1) a1)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (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 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 (*.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 (*.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 (cos.f64 th) a2) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 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 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #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 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 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 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))))))
(/.f64 #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 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 (*.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(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 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 (*.f64 a2 a2) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 (*.f64 a1 a1) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 a2 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(-.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))) #s(literal -1 binary64)))
(+.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(+.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)))
(*.f64 #s(literal 1 binary64) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(pow.f64 (exp.f64 #s(literal -1/2 binary64)) (log.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (neg.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal -1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) (+.f64 a2 a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 a1)) (/.f64 (cos.f64 th) (-.f64 a2 a1)))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1))
(fma.f64 (*.f64 (cos.f64 th) a1) a1 (*.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 (*.f64 a2 a2) (cos.f64 th) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(fma.f64 (cos.f64 th) (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 (*.f64 a1 a1) (cos.f64 th) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(+.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(+.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (+.f64 a1 a2)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 a2 a1)))
(*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (fma.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (fma.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(*.f64 (/.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 a1 a2)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 a2 a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 a1)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(pow.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1))) (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)) (-.f64 (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2))) (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 #s(literal 1 binary64) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 (neg.f64 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (neg.f64 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 #s(literal 1 binary64) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 (neg.f64 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 (neg.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 (neg.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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 (neg.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))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (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)) 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 (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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (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))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a1 a1)) (/.f64 (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 (+.f64 (/.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) (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 (+.f64 (/.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 (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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (neg.f64 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 a1 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 (*.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 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 (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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 (*.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 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 #s(literal 1 binary64) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 (neg.f64 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (fma.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a1 (neg.f64 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #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) (/.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) (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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (neg.f64 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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)) (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)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a1 (neg.f64 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (neg.f64 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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) (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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (neg.f64 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (neg.f64 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 a1 (neg.f64 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a1 (neg.f64 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))
(/.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))
(fma.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (neg.f64 a1) #s(literal -1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 (neg.f64 a2) #s(literal -1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 a1 (pow.f64 a1 #s(literal -1 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 a2 (pow.f64 a2 #s(literal -1 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64)))
(fma.f64 (*.f64 a2 a2) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 a2 #s(literal -1 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal -1 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 a1 a1) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(-.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(+.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)))
(+.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(+.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (pow.f64 (pow.f64 a1 #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) a1)
(*.f64 (neg.f64 a1) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 a1 #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.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)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (neg.f64 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.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 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)))) (neg.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))) (neg.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (neg.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))) (neg.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (neg.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64)))) (neg.f64 (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)))) (neg.f64 (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64)))) (neg.f64 (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)))) (neg.f64 (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th))))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (neg.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)) (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (neg.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) #s(literal 1 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #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 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #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 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (/.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))) (*.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))))) (*.f64 (/.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th))))
(/.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64))))
(/.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal -1 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th)))))
(fma.f64 (/.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 a1 a2)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 a1 a2)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(fma.f64 (/.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (+.f64 a2 a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 a1)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(fma.f64 (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th)) th (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(fma.f64 (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(fma.f64 (*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) th) (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(fma.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(fma.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (pow.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 #s(literal 1 binary64) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) (*.f64 th (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(fma.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
(fma.f64 th (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(fma.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(+.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
(+.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
(+.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(+.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(+.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(+.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) th) th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 a1 a2)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 a1)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(*.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (pow.f64 (pow.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th))
(*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 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))))
(pow.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64))) #s(literal 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 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (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 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (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 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #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 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 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 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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)) (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 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.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 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 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) (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)))) (*.f64 (neg.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 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (neg.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 (*.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 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (neg.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))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 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) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.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 (*.f64 (cos.f64 th) 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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 (cos.f64 th) a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.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 (*.f64 (cos.f64 th) 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) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #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 (*.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 (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 (cos.f64 th) a2) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.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 (cos.f64 th) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 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 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (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 #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 (*.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 (*.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 (cos.f64 th) 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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 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 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (neg.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 #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 (*.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 (*.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 (cos.f64 th) a2) a2)))) (*.f64 (neg.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))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 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 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (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 #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 (*.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 (*.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 (cos.f64 th) 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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 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 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (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 (cos.f64 th) a1) a1)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (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 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 (*.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 (*.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 (cos.f64 th) a2) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 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 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #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 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 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 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))))))
(/.f64 #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 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 (*.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(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 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 (*.f64 a2 a2) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 (*.f64 a1 a1) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 a2 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(-.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))) #s(literal -1 binary64)))
(+.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(+.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (+.f64 a1 a2)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 a2 a1)))
(*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (fma.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (fma.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(*.f64 a2 a2)
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 a1 a2)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 a1)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(*.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 (cos.f64 th) #s(literal -1 binary64))))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (pow.f64 (pow.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))
(*.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th))
(*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 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))))
(pow.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64))) #s(literal 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 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (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 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (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 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #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 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 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 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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)) (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 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.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 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 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) (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)))) (*.f64 (neg.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 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (neg.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 (*.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 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (neg.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))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 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) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.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 (*.f64 (cos.f64 th) 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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 (cos.f64 th) a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.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 (*.f64 (cos.f64 th) 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) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (/.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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #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 (*.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 (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 (cos.f64 th) a2) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.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 (cos.f64 th) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 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 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (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 #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 (*.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 (*.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 (cos.f64 th) 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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 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 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (neg.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 #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 (*.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 (*.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 (cos.f64 th) a2) a2)))) (*.f64 (neg.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))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 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 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (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 #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 (*.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 (*.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 (cos.f64 th) 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)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 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 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (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 (cos.f64 th) a1) a1)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (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 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 (*.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 (*.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 (cos.f64 th) a2) a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 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 (cos.f64 th) a2) a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #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 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 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 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))))))
(/.f64 #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 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 (*.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(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 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(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 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 (*.f64 a2 a2) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 (*.f64 a1 a1) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (pow.f64 (cos.f64 th) #s(literal -1 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 a2 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(-.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (*.f64 (pow.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))) #s(literal -1 binary64)))
(+.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(+.f64 (*.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 a1 a1)
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(cos.f64 th)
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (pow.f64 (pow.f64 a2 #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) a2)
(*.f64 (neg.f64 a2) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 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))))
(/.f64 (*.f64 a2 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (neg.f64 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal -1 binary64)))
(*.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 a2) #s(literal -1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 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 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (/.f64 a2 (pow.f64 a2 #s(literal -1 binary64))))
(*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 a2 #s(literal -1 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (*.f64 a2 (pow.f64 #s(literal 4 binary64) #s(literal -1/8 binary64))) #s(literal 2 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 a2 (neg.f64 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 a2 #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (neg.f64 (*.f64 (neg.f64 a2) a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 a2 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a2)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (neg.f64 a2) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(exp.f64 (-.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 a2) #s(literal 2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/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 #s(literal 4 binary64) #s(literal -1/4 binary64)) (pow.f64 (pow.f64 (cos.f64 th) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (cos.f64 th))
(*.f64 (neg.f64 (cos.f64 th)) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64))) (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))))))
(/.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (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 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.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)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal -1 binary64)))

eval329.0ms (3.8%)

Memory
44.7MiB live, 581.3MiB allocated
Compiler

Compiled 76 791 to 3 167 computations (95.9% saved)

prune285.0ms (3.3%)

Memory
-16.6MiB live, 644.4MiB allocated
Pruning

24 alts after pruning (24 fresh and 0 done)

PrunedKeptTotal
New2 563242 587
Fresh707
Picked505
Done000
Total2 575242 599
Accuracy
100.0%
Counts
2 599 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
65.2%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
64.5%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
68.1%
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
99.3%
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
29.3%
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))))
99.7%
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
68.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
68.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
68.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)))))
63.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
68.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.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
66.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
68.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
66.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))))
64.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
99.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
67.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
12.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
27.8%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (fma.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))))
68.2%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
66.0%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (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 1/2 binary64)))))
99.7%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)))
99.4%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
Compiler

Compiled 962 to 544 computations (43.5% saved)

simplify121.0ms (1.4%)

Memory
2.8MiB live, 158.5MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
cost-diff128
(+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1))
cost-diff1984
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
cost-diff4160
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
cost-diff0
(*.f64 a1 a1)
cost-diff0
(fma.f64 a2 a2 (*.f64 a1 a1))
cost-diff0
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
cost-diff0
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (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 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
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 1/2 binary64)))
cost-diff0
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
cost-diff0
(fma.f64 a1 a1 (*.f64 a2 a2))
cost-diff0
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
cost-diff0
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
cost-diff0
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)))
Rules
5 454×lower-fma.f32
5 442×lower-fma.f64
5 324×lower-*.f32
5 306×lower-*.f64
1 864×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
051464
081450
1143450
2287438
3601438
41077438
51498438
61939438
73023428
84720414
97319414
107799414
08100413
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 th)
th
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/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 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 th th)
th
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
(*.f64 th th)
th
#s(literal 1/24 binary64)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
a1
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))
(*.f64 a2 a2)
a2
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
Outputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 th)
th
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/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 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 th th)
th
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
(*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
a2
(*.f64 a1 a1)
a1
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
(*.f64 th th)
th
#s(literal 1/24 binary64)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
#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))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
a1
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)
(*.f64 a2 a2)
a2
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (/.f64 #s(literal 2 binary64) a2) (*.f64 a1 a2))

localize121.0ms (1.4%)

Memory
-20.7MiB live, 213.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy7.607907057107199
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
accuracy8.074909224008435
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
accuracy8.948221196507024
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)
accuracy20.29164701982331
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
accuracy0.0546875
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
accuracy0.21484375
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
accuracy0.3318989984526299
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
accuracy29.550330716414486
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
accuracy0.006191259768442017
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
accuracy0.158535009768442
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.7389450195368841
(/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
accuracy29.558891167619404
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
accuracy0
(sqrt.f64 #s(literal 1/2 binary64))
accuracy0.00390625
(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy0.178066259768442
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
accuracy20.29164701982331
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
accuracy0.00390625
(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy0.00390625
(cos.f64 th)
accuracy0.0625
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
accuracy0.178066259768442
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
Samples
87.0ms256×0valid
Compiler

Compiled 344 to 44 computations (87.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 63.0ms
ival-mult: 23.0ms (36.7% of total)
const: 10.0ms (16% of total)
ival-add: 9.0ms (14.4% of total)
ival-div: 7.0ms (11.2% of total)
ival-cos: 5.0ms (8% of total)
ival-pow: 4.0ms (6.4% of total)
ival-sqrt: 3.0ms (4.8% of total)
exact: 1.0ms (1.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series55.0ms (0.6%)

Memory
19.8MiB live, 99.6MiB allocated
Counts
24 → 552
Calls
Call 1
Inputs
#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/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 #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<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))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())
#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())
#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())
#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())
#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(literal 1/2 binary64)) (patch (sqrt.f64 #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())
Outputs
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 1/2)) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (*.f64 a2 a2)) (patch (fma.f64 a1 a1 (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (*.f64 a2 a2)) (patch (fma.f64 a1 a1 (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (*.f64 a2 a2)) (patch (fma.f64 a1 a1 (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (*.f64 a2 a2)) (patch (fma.f64 a1 a1 (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 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) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) a1) (taylor 0 a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1) (taylor 0 a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1) (taylor 0 a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1) (taylor 0 a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor inf a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/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) (* (cos th) (sqrt 1/2))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2)))) (taylor inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2)))) (taylor inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2)))) (taylor inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/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) (* (cos th) (sqrt 1/2))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2)))))) (taylor -inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2)))))) (taylor -inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2)))))) (taylor -inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))) (taylor 0 th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))) (taylor 0 th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #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))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<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 1 (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/24 (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/24 (* -1/720 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/24 (* -1/720 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/24 (* -1/720 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #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))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (pow th 2)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/720 (pow th 2)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #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))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (pow th 2)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/720 (pow th 2)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/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 a1 2) (* (cos th) (sqrt 1/2))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<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))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2)) (taylor 0 a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2)) (taylor 0 a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2)) (taylor 0 a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor inf a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 1/2)) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/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) (* (cos th) (sqrt 1/2))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<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))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) a1) (taylor inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) (patch (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 1/2)) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/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) (* (cos th) (sqrt 1/2))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))) #<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))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt (fma.f64 a2 a2 (*.f64 a1 a1)) (patch (fma.f64 a2 a2 (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sqrt 2) 2) (* a1 (pow a2 2))) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) a1) (taylor -inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor -inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor -inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor -inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
Calls

9 calls:

TimeVariablePointExpression
5.0ms
th
@inf
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (cos th)) (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (+ (* a1 a1) (* a2 a2)) (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* a2 a2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1))) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1)) (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (cos th) (sqrt 1/2) (cos th) (/ (cos th) (sqrt 2)) (+ (* -1/2 (* th th)) 1) (cos th) (+ (* -1/720 (* th th)) 1/24) (* (/ (sqrt 2) (* a2 a2)) a1))
4.0ms
a1
@0
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (cos th)) (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (+ (* a1 a1) (* a2 a2)) (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* a2 a2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1))) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1)) (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (cos th) (sqrt 1/2) (cos th) (/ (cos th) (sqrt 2)) (+ (* -1/2 (* th th)) 1) (cos th) (+ (* -1/720 (* th th)) 1/24) (* (/ (sqrt 2) (* a2 a2)) a1))
4.0ms
a1
@-inf
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (cos th)) (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (+ (* a1 a1) (* a2 a2)) (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* a2 a2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1))) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1)) (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (cos th) (sqrt 1/2) (cos th) (/ (cos th) (sqrt 2)) (+ (* -1/2 (* th th)) 1) (cos th) (+ (* -1/720 (* th th)) 1/24) (* (/ (sqrt 2) (* a2 a2)) a1))
3.0ms
a1
@inf
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (cos th)) (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (+ (* a1 a1) (* a2 a2)) (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* a2 a2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1))) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1)) (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (cos th) (sqrt 1/2) (cos th) (/ (cos th) (sqrt 2)) (+ (* -1/2 (* th th)) 1) (cos th) (+ (* -1/720 (* th th)) 1/24) (* (/ (sqrt 2) (* a2 a2)) a1))
3.0ms
a2
@0
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (cos th)) (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (+ (* a1 a1) (* a2 a2)) (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* a2 a2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1))) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1)) (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (cos th) (sqrt 1/2) (cos th) (/ (cos th) (sqrt 2)) (+ (* -1/2 (* th th)) 1) (cos th) (+ (* -1/720 (* th th)) 1/24) (* (/ (sqrt 2) (* a2 a2)) a1))

simplify201.0ms (2.3%)

Memory
5.8MiB live, 275.7MiB allocated
Algorithm
egg-herbie
Rules
14 556×lower-fma.f64
14 556×lower-fma.f32
5 060×lower-*.f64
5 060×lower-*.f32
4 760×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02037416
16556588
223796366
368646138
477146126
080375696
Stop Event
iter limit
node limit
Counts
552 → 552
Calls
Call 1
Inputs
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a2 2) (sqrt 1/2))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/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) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (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)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (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)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (sqrt 2) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/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) (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)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (pow a1 2) (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 (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2))))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2))))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 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)))))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/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) (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)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (pow a1 2) (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 (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2))))))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2))))))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 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)))))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/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 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) (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) (pow a2 2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(+ (/ (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
(+ 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/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/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 (* -1/2 (pow th 2)))
(+ 1 (* -1/2 (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/24
(+ 1/24 (* -1/720 (pow th 2)))
(+ 1/24 (* -1/720 (pow th 2)))
(+ 1/24 (* -1/720 (pow th 2)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(* -1/2 (pow th 2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(cos th)
(cos th)
(cos th)
(cos th)
(* -1/720 (pow th 2))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(* -1/2 (pow th 2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(cos th)
(cos th)
(cos th)
(cos th)
(* -1/720 (pow th 2))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a1 2) (sqrt 1/2))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(pow a1 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 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(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) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(* (pow 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)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 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 (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (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)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(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) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (cos th))
(* (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)
(* (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) (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 (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (sqrt 2) a1)
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(+ (/ (sqrt 2) a1) (/ (* a1 (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)))))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(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) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (cos th))
(* (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)
(* (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) (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 (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/ (sqrt 2) a1)
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(+ (/ (sqrt 2) a1) (/ (* a1 (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)))))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
Outputs
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (pow a2 2) (sqrt 1/2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (sqrt 2) a1)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))) a1)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (pow a1 2) (sqrt 2))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (pow a1 2) (sqrt 2))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2))))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2))))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2))))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 th th)))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 th th)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #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 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 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)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (/.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 (fma.f64 (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 th (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (/.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 (* -1/2 (pow th 2)))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #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
#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 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
1/24
#s(literal 1/24 binary64)
(+ 1/24 (* -1/720 (pow th 2)))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
(+ 1/24 (* -1/720 (pow th 2)))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
(+ 1/24 (* -1/720 (pow th 2)))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (pow th 2))
(*.f64 (*.f64 th th) #s(literal -1/2 binary64))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(* -1/720 (pow th 2))
(*.f64 #s(literal -1/720 binary64) (*.f64 th th))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (pow th 2))
(*.f64 (*.f64 th th) #s(literal -1/2 binary64))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(* -1/720 (pow th 2))
(*.f64 #s(literal -1/720 binary64) (*.f64 th th))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (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 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a1 2) (sqrt 2))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (/.f64 a2 a1) a1)) (*.f64 a2 a2))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (/.f64 a2 a1) a1)) (*.f64 a2 a2))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (/.f64 a2 a1) a1)) (*.f64 a2 a2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (sqrt 1/2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (sqrt 2) a1)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (sqrt 1/2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (pow (sqrt 2) 2) (* a1 (pow a2 2)))
(/.f64 #s(literal 2 binary64) (*.f64 a1 (*.f64 a2 a2)))
(/ (sqrt 2) a1)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))

rewrite184.0ms (2.1%)

Memory
4.2MiB live, 282.4MiB allocated
Rules
4 716×lower-/.f32
4 706×lower-/.f64
4 618×lower-*.f32
4 600×lower-*.f64
2 950×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
051359
081345
1289331
22307331
08295328
Stop Event
iter limit
node limit
iter limit
Counts
24 → 750
Calls
Call 1
Inputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(cos.f64 th)
(sqrt.f64 #s(literal 1/2 binary64))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
(/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)
Outputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 1/2 binary64))))
(fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 1/2 binary64))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (pow.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (pow.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(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))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(*.f64 a2 a2)
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th 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 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.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))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) (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))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (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))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (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))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(/.f64 (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) (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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) (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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 #s(approx (cos th) (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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (*.f64 #s(approx (cos th) (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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(fma.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 a1) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (pow.f64 (pow.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #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 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))) (neg.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))) #s(literal -1 binary64)))
(*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(fma.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 a2 a2) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 a1 a1)))
(fma.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 a1 a1) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 a2) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 (*.f64 a1 a1) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))))
(fma.f64 (*.f64 a1 a1) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 (*.f64 a2 a2) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 a1) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))))
(+.f64 (*.f64 (*.f64 a1 a1) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 a2) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))))
(+.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 a1 a1)))
(+.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 a2 a2)))
(*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (pow.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (pow.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(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))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 a1 a1)
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (pow.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) #s(literal -1 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))
(*.f64 (/.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) #s(literal 1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 #s(literal 2 binary64) a1)) (*.f64 a2 a2))
(*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 #s(literal 2 binary64) (*.f64 a2 a2))) a1)
(*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) a1))
(*.f64 (/.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)) (pow.f64 (pow.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2))
(*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #s(literal -1 binary64)))
(*.f64 (neg.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (pow.f64 (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 a2 a2) a1)) #s(literal -1 binary64)))
(*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) a1) (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a2 a2))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) a1) (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a2 a2))) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (pow.f64 a1 #s(literal -1 binary64))))
(/.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (neg.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))) (neg.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))) (neg.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 1 binary64))) (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2))) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))) (neg.f64 (neg.f64 (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 a2 a2) a1)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)) (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))))))
(/.f64 (/.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 a1 #s(literal -1 binary64)))
(/.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1))) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1))) (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)))
(/.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))))
(/.f64 (neg.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (neg.f64 (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 a2 a2) a1))))
(/.f64 (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64)))))
(/.f64 (*.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) #s(literal 1 binary64)) (*.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)) (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) a1) (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a2 a2))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) a1) (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a2 a2)))))
(/.f64 (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))))
(/.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) a1) (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) a1) (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) a1) (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a2 a2))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64)))))
(neg.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 #s(literal -2 binary64) (*.f64 (*.f64 a2 a2) a1))))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 #s(literal 2 binary64) a1) (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))
(*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 a2 a2)) (pow.f64 a1 #s(literal -1 binary64)))
(*.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 a2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) a1)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal -1 binary64)) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 a2 a2) a1) #s(literal -1 binary64)))
(pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 2 binary64) a1)) #s(literal -1 binary64))
(pow.f64 (/.f64 a1 (/.f64 #s(literal 2 binary64) (*.f64 a2 a2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 a2 a2) a1) #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) a1) a2)) (neg.f64 a2))
(/.f64 (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (neg.f64 a2))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 a1)))
(/.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 a1)))
(/.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (neg.f64 a2))
(/.f64 (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 a2 (neg.f64 a1))))
(/.f64 (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))) (neg.f64 (*.f64 a2 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (neg.f64 (*.f64 (neg.f64 a1) a2)))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (neg.f64 (*.f64 a1 a2)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (neg.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a2)))
(/.f64 (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 a2 a1)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (neg.f64 (*.f64 (neg.f64 a2) a2)))
(/.f64 (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (neg.f64 a2) a2)))
(/.f64 (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))) (neg.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) a1)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 a1 (*.f64 (neg.f64 a2) a2))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 a2 a2) (neg.f64 a1))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 a2 a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) a1))) (neg.f64 (*.f64 (neg.f64 a2) a2)))
(/.f64 (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 a2 a2)))) (neg.f64 (neg.f64 a1)))
(/.f64 (/.f64 (/.f64 #s(literal 2 binary64) a1) a2) a2)
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a2)
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (neg.f64 a2) a2))
(/.f64 (*.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))
(/.f64 (*.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 #s(literal 2 binary64) a1)) (*.f64 (neg.f64 a2) a2))
(/.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 a2 a2))) (neg.f64 a1))
(/.f64 (neg.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (neg.f64 a1)))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a1))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (neg.f64 a1) a2))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 a1 a2))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) a1))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 a1))))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a2) a2))))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 a2 a2) a1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 2 binary64) a1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 a1 (/.f64 #s(literal 2 binary64) (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) a1) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1))))
(/.f64 (/.f64 #s(literal 2 binary64) a1) (*.f64 a2 a2))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 a2 a2)) a1)
(/.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 2 binary64) a1)))
(/.f64 #s(literal 1 binary64) (/.f64 a1 (/.f64 #s(literal 2 binary64) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 a2) a1) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (*.f64 (*.f64 a2 a2) a1))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 a1)))
(/.f64 #s(literal 2 binary64) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a2) a2)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1))
(*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (pow.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)) (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)))) (neg.f64 (-.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))))) (neg.f64 (neg.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (neg.f64 (neg.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 a1) (*.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (*.f64 (*.f64 a2 a2) (neg.f64 a1))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (neg.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 a2 a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (neg.f64 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (neg.f64 (*.f64 (neg.f64 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (neg.f64 (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (neg.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))) (*.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))) (*.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (neg.f64 (neg.f64 a1)) (*.f64 a2 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a2 (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) a1 (*.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 #s(literal -1 binary64))) (*.f64 a2 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (neg.f64 a1) (*.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 (neg.f64 a1)))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (neg.f64 (neg.f64 a1)) (*.f64 a2 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a2 (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) a1 (*.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 #s(literal -1 binary64))) (*.f64 a2 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (neg.f64 a1) (*.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 (neg.f64 a1)))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) a1))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal -1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (neg.f64 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 a1)))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) a1))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 a1) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1)))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (neg.f64 (neg.f64 a1)) (*.f64 a2 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a2 (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a1 (*.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 #s(literal -1 binary64))) (*.f64 a2 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (neg.f64 a1) (*.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 (neg.f64 a1)))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) a1))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal -1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 a1)))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) a1))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 a1) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1)))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) a1))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal -1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 a1)))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) a1))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 a2) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) #s(literal -1 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 a1)) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) a1 (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 a1) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) a1 (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 a1 a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 a1 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 a1 (neg.f64 a1) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1)))
(/.f64 (fma.f64 a1 a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 a1 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (neg.f64 (neg.f64 a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 (neg.f64 (neg.f64 a1)) a2))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 (neg.f64 (neg.f64 a1)) a2))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (neg.f64 (neg.f64 a1)) a2))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a2 a2)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (neg.f64 (neg.f64 a1)) #s(literal 1 binary64))) (*.f64 (neg.f64 (neg.f64 a1)) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) a1)) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) a2 (*.f64 a1 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 a1 a2))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) a2 (*.f64 a1 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 a1 a2))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 #s(literal 1 binary64) a1))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) a2 (*.f64 a1 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 a1 a2))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 #s(literal 1 binary64)))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 a2) (*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 #s(literal 1 binary64))) (*.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -1 binary64) a2 (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a2))
(/.f64 (fma.f64 #s(literal -1 binary64) a2 (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a2))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -1 binary64) a2 (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a2))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (neg.f64 a2) a2 (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (neg.f64 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 (neg.f64 a1) a2))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (neg.f64 a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 (neg.f64 a1) a2))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (neg.f64 a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (neg.f64 a1) (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (neg.f64 a1) a2))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 a1) (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (neg.f64 a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 a1) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (neg.f64 a1) #s(literal 1 binary64))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) a1)) (*.f64 (neg.f64 a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) a2 (*.f64 a1 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 a1 a2))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) a2 (*.f64 a1 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 a1 a2))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 #s(literal 1 binary64) a1))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) a2 (*.f64 a1 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 a1 a2))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 #s(literal 1 binary64)))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 #s(literal 1 binary64))) (*.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) a1)) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) a1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (neg.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))) (neg.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 a1) (*.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (neg.f64 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (neg.f64 a1) (*.f64 a2 a2)))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)) (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))))
(/.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))))
(/.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (fma.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1))))
(/.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) a1) (pow.f64 a2 #s(literal -2 binary64))) a1)) (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (pow.f64 a2 #s(literal -2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(fma.f64 (pow.f64 a1 #s(literal -1 binary64)) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
(fma.f64 (pow.f64 a1 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
(fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (neg.f64 a1) #s(literal -1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
(fma.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal -1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
(fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
(fma.f64 a1 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(-.f64 (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(cos.f64 th)
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))
(pow.f64 (exp.f64 (log.f64 #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
#s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (pow.f64 (pow.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(neg.f64 (/.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #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 (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) #s(literal -1 binary64)) (pow.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (pow.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))) (fma.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) #s(literal -1 binary64)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) #s(literal -1 binary64))) (neg.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) (neg.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) #s(literal -1 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))) (fma.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)))))
(/.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) #s(literal -1 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64)))
(/.f64 (fma.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))) (fma.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))))
(fma.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 th #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 th #s(literal -1/2 binary64)) th #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(-.f64 (/.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64))) (pow.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64)) #s(literal -1 binary64)))
(+.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(*.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64)) (pow.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) #s(literal -1 binary64)))
(*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (pow.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/576 binary64) (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))))) (neg.f64 (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) #s(literal 1/576 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64))))
(/.f64 (-.f64 #s(literal 1/576 binary64) (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)))) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64))) (neg.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) (neg.f64 (+.f64 #s(literal 1/576 binary64) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) (neg.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)))))
(/.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)))
(/.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (+.f64 #s(literal 1/576 binary64) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))))
(/.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))))
(fma.f64 (*.f64 #s(literal -1/720 binary64) th) th #s(literal 1/24 binary64))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
(fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))
(fma.f64 th (*.f64 #s(literal -1/720 binary64) th) #s(literal 1/24 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64))) (/.f64 #s(literal 1/576 binary64) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64))))
(+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))
(+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (pow.f64 a2 #s(literal -2 binary64)))
(*.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 a1 (*.f64 a2 a2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) a1))
(*.f64 a1 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2)) (neg.f64 a2))
(/.f64 (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1)) (neg.f64 a2))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1)) (neg.f64 (*.f64 (neg.f64 a2) a2)))
(/.f64 (neg.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (neg.f64 a2))
(/.f64 (neg.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (neg.f64 a2) a2)))
(/.f64 (neg.f64 (*.f64 a1 #s(literal 1 binary64))) (neg.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (neg.f64 (*.f64 (neg.f64 a2) a2)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a1)) (neg.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) a2)
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) a2)
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) a2))
(/.f64 (*.f64 #s(literal 1 binary64) a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(/.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2))
(/.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (neg.f64 a2) a2))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 a2))
(/.f64 (neg.f64 a1) (neg.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))

eval200.0ms (2.3%)

Memory
4.2MiB live, 389.6MiB allocated
Compiler

Compiled 38 450 to 2 590 computations (93.3% saved)

prune177.0ms (2%)

Memory
8.0MiB live, 403.2MiB allocated
Pruning

34 alts after pruning (32 fresh and 2 done)

PrunedKeptTotal
New1 537201 557
Fresh71219
Picked325
Done000
Total1 547341 581
Accuracy
100.0%
Counts
1 581 → 34
Alt Table
Click to see full alt table
StatusAccuracyProgram
64.5%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 #s(approx (+ (* -1/720 (* th th)) 1/24) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
15.4%
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
68.1%
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
99.3%
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
29.3%
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))))
99.7%
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
68.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
68.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
68.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)))))
63.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
68.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))))
66.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
56.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))))
56.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) a1)))))
16.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (/.f64 a2 a1) a1)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
61.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1))))
66.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))))
68.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(approx (+ (* -1/2 (* th th)) 1) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
63.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)))
64.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* (/ a2 (sqrt 2)) a2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) th) th #s(literal 1 binary64))))
99.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
65.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
67.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
12.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (* (/ (sqrt 2) (* a2 a2)) (/ (sqrt 2) a1))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
99.7%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
68.2%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
99.7%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)))
65.3%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))))
99.4%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
67.9%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
12.6%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 1/2 binary64))))
99.3%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)) (cos.f64 th)))
67.8%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)))
12.6%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
Compiler

Compiled 1 291 to 736 computations (43% saved)

simplify117.0ms (1.3%)

Memory
-8.6MiB live, 158.5MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))))
cost-diff128
(+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1))
cost-diff1152
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))
cost-diff1728
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
(*.f64 a1 a1)
cost-diff0
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
cost-diff0
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
cost-diff0
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
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)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff0
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1)
cost-diff0
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)
cost-diff0
#s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
cost-diff0
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
cost-diff0
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
Rules
8 582×lower-fma.f32
8 572×lower-fma.f64
3 240×lower-*.f32
3 218×lower-*.f64
1 822×lower-+.f32
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
062524
099505
1176485
2394482
31206479
43923479
57135479
08051479
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 th)
th
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
#s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1)
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
a1
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
(*.f64 a2 a2)
a2
(/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 th th)
th
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
(*.f64 a1 a1)
a1
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
(*.f64 th th)
th
#s(literal 1/24 binary64)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))
(+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
a1
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))
(*.f64 a2 a2)
a2
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 a2 a2) (neg.f64 a1))
(neg.f64 a1)
Outputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 th)
th
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
#s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1)
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
a1
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))
(*.f64 a2 a2)
a2
(/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 th th)
th
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
(*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
(*.f64 a1 a1)
a1
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
(*.f64 th th)
th
#s(literal 1/24 binary64)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a1) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))
(*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a1) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
a1
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)
(*.f64 a2 a2)
a2
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))
(/.f64 (/.f64 #s(literal 2 binary64) a2) (*.f64 a1 a2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
#s(literal -2 binary64)
(neg.f64 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 a2 a2) (neg.f64 a1))
(*.f64 (neg.f64 a2) (*.f64 a1 a2))
(neg.f64 a1)

localize145.0ms (1.7%)

Memory
-14.6MiB live, 263.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy7.743151097293287
(*.f64 (*.f64 a2 a2) (neg.f64 a1))
accuracy8.074909224008435
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))
accuracy8.948221196507024
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)
accuracy20.29164701982331
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))))
accuracy0.21484375
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
accuracy0.3318989984526299
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
accuracy29.550330716414486
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
accuracy54.25510141989518
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
accuracy0.158535009768442
(*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.22917591011474348
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
accuracy0.7389450195368841
(/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
accuracy29.558891167619404
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
accuracy0.12890625
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)
accuracy0.40234375
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1)
accuracy20.29164701982331
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
accuracy54.25263812692828
#s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
accuracy0.00390625
(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy0.00390625
(cos.f64 th)
accuracy0.158535009768442
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
accuracy0.2109375
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))
Samples
107.0ms256×0valid
Compiler

Compiled 357 to 51 computations (85.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 73.0ms
ival-mult: 29.0ms (39.9% of total)
ival-add: 10.0ms (13.8% of total)
ival-div: 9.0ms (12.4% of total)
ival-cos: 7.0ms (9.6% of total)
const: 6.0ms (8.3% of total)
ival-pow: 4.0ms (5.5% of total)
ival-sqrt: 3.0ms (4.1% of total)
ival-neg: 3.0ms (4.1% of total)
exact: 1.0ms (1.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series53.0ms (0.6%)

Memory
18.4MiB live, 95.8MiB allocated
Counts
27 → 600
Calls
Call 1
Inputs
#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())
#s(alt (fma.f64 a1 a1 (*.f64 a2 a2)) (patch (fma.f64 a1 a1 (*.f64 a2 a2)) #<representation binary64>) () ())
#s(alt (*.f64 a2 a2) (patch (*.f64 a2 a2) #<representation binary64>) () ())
#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())
#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<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 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())
#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())
#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) #<representation binary64>) () ())
#s(alt (cos.f64 th) (patch (cos.f64 th) #<representation binary64>) () ())
#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())
Outputs
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (*.f64 a2 a2)) (patch (fma.f64 a1 a1 (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (*.f64 a2 a2)) (patch (fma.f64 a1 a1 (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (*.f64 a2 a2)) (patch (fma.f64 a1 a1 (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt (fma.f64 a1 a1 (*.f64 a2 a2)) (patch (fma.f64 a1 a1 (*.f64 a2 a2)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 1/2)) (taylor 0 a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor 0 a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor 0 a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<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 a2 2) (cos th)) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor 0 a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor 0 a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) a1) (taylor 0 a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1) (taylor 0 a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1) (taylor 0 a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1) (taylor 0 a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor 0 a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<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) (* (cos th) (sqrt 1/2))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor inf a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor inf a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<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 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor inf a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor inf a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor inf a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2)))) (taylor inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2)))) (taylor inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2)))) (taylor inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor inf a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor inf a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor inf a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor inf a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<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) (* (cos th) (sqrt 1/2))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor -inf a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor -inf a1) (#s(alt (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) (patch (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (* a1 (sqrt 1/2)) (taylor -inf a1) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor -inf a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<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 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor -inf a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2)))) (taylor -inf a1) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (taylor -inf a1) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor -inf a1) (#s(alt (*.f64 a1 a1) (patch (*.f64 a1 a1) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor -inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2)))))) (taylor -inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2)))))) (taylor -inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2)))))) (taylor -inf a1) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (taylor -inf a1) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a1) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor -inf a1) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))) (taylor 0 th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))) (taylor 0 th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) 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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2))) (taylor 0 th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))) (taylor 0 th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (sqrt 1/2) (taylor 0 th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* -1/2 (* (pow th 2) (sqrt 1/2)))) (taylor 0 th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* (pow th 2) (+ (* -1/2 (sqrt 1/2)) (* 1/24 (* (pow th 2) (sqrt 1/2)))))) (taylor 0 th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt 1/2) (* (pow th 2) (+ (* -1/2 (sqrt 1/2)) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (sqrt 1/2))) (* 1/24 (sqrt 1/2))))))) (taylor 0 th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 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 1 (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (sqrt 2)) (taylor 0 th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2))) (taylor 0 th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow th 2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2))) (taylor 0 th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/24 (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/24 (* -1/720 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/24 (* -1/720 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/24 (* -1/720 (pow th 2))) (taylor 0 th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) 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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor inf th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (sqrt 1/2)) (taylor inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (sqrt 1/2)) (taylor inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (sqrt 1/2)) (taylor inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (sqrt 1/2)) (taylor inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 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) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/720 (pow th 2)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (taylor -inf th) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) 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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (+ (pow a1 2) (pow a2 2))) (taylor -inf th) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor -inf th) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (sqrt 1/2)) (taylor -inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (sqrt 1/2)) (taylor -inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (sqrt 1/2)) (taylor -inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) #<representation binary64>) () ())) ())
#s(alt (* (cos th) (sqrt 1/2)) (taylor -inf th) (#s(alt (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (patch (*.f64 (sqrt.f64 #s(literal 1/2 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) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (cos th) (sqrt 2)) (taylor -inf th) (#s(alt (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos th) (taylor -inf th) (#s(alt #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (patch #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/720 (pow th 2)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720)) (taylor -inf th) (#s(alt (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (patch (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (* (cos th) (sqrt 1/2))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<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) (* (cos th) (sqrt 1/2))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2)))) (taylor 0 a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (sqrt 1/2)) (taylor 0 a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2))) (taylor 0 a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) 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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<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 a1 2) (cos th)) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a1 2) (cos th)) (taylor 0 a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (taylor 0 a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a1 2) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (+ (pow a1 2) (pow a2 2)) (taylor 0 a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a1 2) (sqrt 2)) (taylor 0 a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (taylor 0 a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2)) (taylor 0 a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2)) (taylor 0 a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2)) (taylor 0 a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2))) (taylor 0 a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor 0 a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor 0 a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<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) (* (cos th) (sqrt 1/2))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 1/2)) (taylor inf a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) 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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor inf a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<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 (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor inf a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor inf a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor inf a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor inf a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) a1) (taylor inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (* (cos th) (sqrt 1/2))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (patch (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) #<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) (* (cos th) (sqrt 1/2))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) (patch #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (sqrt 1/2)) (taylor -inf a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)) (patch #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) 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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#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 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a2 2) (cos th)) (sqrt 2)) (taylor -inf a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<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 (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (cos th)) (taylor -inf a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2)))) (taylor -inf a2) (#s(alt (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (patch (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow a2 2) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2)))) (taylor -inf a2) (#s(alt #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (patch #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a2 2) (sqrt 2)) (taylor -inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) (patch (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))) #<representation binary64>) () ())) ())
#s(alt (/ (sqrt 2) a1) (taylor -inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor -inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor -inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2))) (taylor -inf a2) (#s(alt (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (patch (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2))))) (taylor -inf a2) (#s(alt #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) (patch #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (/ (* a1 (sqrt 2)) (pow a2 2)) (taylor -inf a2) (#s(alt (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) (patch (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* a1 (pow a2 2))) (taylor -inf a2) (#s(alt (*.f64 (*.f64 a2 a2) (neg.f64 a1)) (patch (*.f64 (*.f64 a2 a2) (neg.f64 a1)) #<representation binary64>) () ())) ())
Calls

9 calls:

TimeVariablePointExpression
4.0ms
a2
@0
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (+ (* a1 a1) (* a2 a2)) (* (sqrt 1/2) (cos th))) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (* (* (sqrt 1/2) a1) a1) (* (sqrt 1/2) a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (+ (* a1 a1) (* a2 a2)) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (* (sqrt 2) (neg (sqrt 2))) (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (/ (* (sqrt 2) (neg (sqrt 2))) (* (* a2 a2) (neg a1)))) (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (sqrt 1/2) (cos th)) (cos th) (cos th) (/ (cos th) (sqrt 2)) (cos th) (+ (* -1/720 (* th th)) 1/24) (* (/ (sqrt 2) (* a2 a2)) a1) (* (* a2 a2) (neg a1)))
4.0ms
a1
@inf
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (+ (* a1 a1) (* a2 a2)) (* (sqrt 1/2) (cos th))) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (* (* (sqrt 1/2) a1) a1) (* (sqrt 1/2) a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (+ (* a1 a1) (* a2 a2)) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (* (sqrt 2) (neg (sqrt 2))) (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (/ (* (sqrt 2) (neg (sqrt 2))) (* (* a2 a2) (neg a1)))) (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (sqrt 1/2) (cos th)) (cos th) (cos th) (/ (cos th) (sqrt 2)) (cos th) (+ (* -1/720 (* th th)) 1/24) (* (/ (sqrt 2) (* a2 a2)) a1) (* (* a2 a2) (neg a1)))
3.0ms
a1
@-inf
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (+ (* a1 a1) (* a2 a2)) (* (sqrt 1/2) (cos th))) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (* (* (sqrt 1/2) a1) a1) (* (sqrt 1/2) a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (+ (* a1 a1) (* a2 a2)) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (* (sqrt 2) (neg (sqrt 2))) (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (/ (* (sqrt 2) (neg (sqrt 2))) (* (* a2 a2) (neg a1)))) (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (sqrt 1/2) (cos th)) (cos th) (cos th) (/ (cos th) (sqrt 2)) (cos th) (+ (* -1/720 (* th th)) 1/24) (* (/ (sqrt 2) (* a2 a2)) a1) (* (* a2 a2) (neg a1)))
3.0ms
a1
@0
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (+ (* a1 a1) (* a2 a2)) (* (sqrt 1/2) (cos th))) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (* (* (sqrt 1/2) a1) a1) (* (sqrt 1/2) a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (+ (* a1 a1) (* a2 a2)) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (* (sqrt 2) (neg (sqrt 2))) (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (/ (* (sqrt 2) (neg (sqrt 2))) (* (* a2 a2) (neg a1)))) (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (sqrt 1/2) (cos th)) (cos th) (cos th) (/ (cos th) (sqrt 2)) (cos th) (+ (* -1/720 (* th th)) 1/24) (* (/ (sqrt 2) (* a2 a2)) a1) (* (* a2 a2) (neg a1)))
3.0ms
a2
@inf
((* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (+ (* a1 a1) (* a2 a2)) (* (sqrt 1/2) (cos th))) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (* (* (sqrt 1/2) a1) a1) (* (sqrt 1/2) a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* a1 a1) (* a2 a2)) (/ (cos th) (sqrt 2))) (+ (* a1 a1) (* a2 a2)) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (* (sqrt 2) (neg (sqrt 2))) (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (/ (* (sqrt 2) (neg (sqrt 2))) (* (* a2 a2) (neg a1)))) (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (sqrt 1/2) (cos th)) (cos th) (cos th) (/ (cos th) (sqrt 2)) (cos th) (+ (* -1/720 (* th th)) 1/24) (* (/ (sqrt 2) (* a2 a2)) a1) (* (* a2 a2) (neg a1)))

simplify211.0ms (2.4%)

Memory
20.6MiB live, 256.0MiB allocated
Algorithm
egg-herbie
Rules
14 774×lower-fma.f64
14 774×lower-fma.f32
5 158×lower-*.f64
5 158×lower-*.f32
4 828×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02167612
16986849
225026626
369466395
477836383
080475938
Stop Event
iter limit
node limit
Counts
600 → 600
Calls
Call 1
Inputs
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/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) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a2 2) (sqrt 1/2))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (sqrt 1/2))
(* a1 (sqrt 1/2))
(* a1 (sqrt 1/2))
(* a1 (sqrt 1/2))
(* a1 (sqrt 1/2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (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 a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (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) (cos th)) (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)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (sqrt 2) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (sqrt 1/2))
(* a1 (sqrt 1/2))
(* a1 (sqrt 1/2))
(* a1 (sqrt 1/2))
(* a1 (sqrt 1/2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(* (pow 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 a2 2) (cos th)) (* (pow 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)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2))))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2))))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 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)))))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (sqrt 1/2))
(* a1 (sqrt 1/2))
(* a1 (sqrt 1/2))
(* a1 (sqrt 1/2))
(* a1 (sqrt 1/2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(* (pow 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 a2 2) (cos th)) (* (pow 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)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2))))))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2))))))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 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)))))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/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 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) (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) (pow a2 2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(+ (/ (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))))
(sqrt 1/2)
(+ (sqrt 1/2) (* -1/2 (* (pow th 2) (sqrt 1/2))))
(+ (sqrt 1/2) (* (pow th 2) (+ (* -1/2 (sqrt 1/2)) (* 1/24 (* (pow th 2) (sqrt 1/2))))))
(+ (sqrt 1/2) (* (pow th 2) (+ (* -1/2 (sqrt 1/2)) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (sqrt 1/2))) (* 1/24 (sqrt 1/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/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/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)))
1/24
(+ 1/24 (* -1/720 (pow th 2)))
(+ 1/24 (* -1/720 (pow th 2)))
(+ 1/24 (* -1/720 (pow th 2)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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) (sqrt 1/2))
(* (cos th) (sqrt 1/2))
(* (cos th) (sqrt 1/2))
(* (cos th) (sqrt 1/2))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(cos th)
(cos th)
(cos th)
(cos th)
(* -1/720 (pow th 2))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos 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) (sqrt 1/2))
(* (cos th) (sqrt 1/2))
(* (cos th) (sqrt 1/2))
(* (cos th) (sqrt 1/2))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(cos th)
(cos th)
(cos th)
(cos th)
(* -1/720 (pow th 2))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/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) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a1 2) (sqrt 1/2))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/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)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 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) (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 a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 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)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 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)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (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)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/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) (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 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)) (* (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)
(* (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) (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)))))
(/ (sqrt 2) a1)
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(+ (/ (sqrt 2) a1) (/ (* a1 (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)))))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/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) (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 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)) (* (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)
(* (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) (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)))))
(/ (sqrt 2) a1)
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(+ (/ (sqrt 2) a1) (/ (* a1 (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)))))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(/ (* a1 (sqrt 2)) (pow a2 2))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
(* -1 (* a1 (pow a2 2)))
Outputs
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (pow a2 2) (sqrt 1/2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (sqrt 2) a1)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))) a1)
(/ (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))) a1)
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))) a1)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (pow a1 2) (sqrt 2))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* a1 (+ (/ (sqrt 2) (pow a1 2)) (/ (sqrt 2) (pow a2 2))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a1 a1))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(* a1 (sqrt 1/2))
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (pow a1 2) (sqrt 2))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2))))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2))))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(* -1 (* a1 (+ (* -1 (/ (sqrt 2) (pow a1 2))) (* -1 (/ (sqrt 2) (pow a2 2))))))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 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 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 th th)))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 th th)))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(+ (sqrt 1/2) (* -1/2 (* (pow th 2) (sqrt 1/2))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* (pow th 2) (+ (* -1/2 (sqrt 1/2)) (* 1/24 (* (pow th 2) (sqrt 1/2))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(+ (sqrt 1/2) (* (pow th 2) (+ (* -1/2 (sqrt 1/2)) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (sqrt 1/2))) (* 1/24 (sqrt 1/2)))))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (sqrt.f64 #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #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 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 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)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (/.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 (fma.f64 (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 th (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (/.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 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
1/24
#s(literal 1/24 binary64)
(+ 1/24 (* -1/720 (pow th 2)))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
(+ 1/24 (* -1/720 (pow th 2)))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
(+ 1/24 (* -1/720 (pow th 2)))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (cos th) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))
(* (cos th) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))
(* (cos th) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))
(* (cos th) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 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)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ (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)
(* -1/720 (pow th 2))
(*.f64 #s(literal -1/720 binary64) (*.f64 th th))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (cos th) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))
(* (cos th) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))
(* (cos th) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))
(* (cos th) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 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)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ (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)
(* -1/720 (pow th 2))
(*.f64 #s(literal -1/720 binary64) (*.f64 th th))
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (pow th 2) (- (* 1/24 (/ 1 (pow th 2))) 1/720))
(*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/720 binary64)) th) th)
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1)
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a1 2) (sqrt 2))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (/.f64 a2 a1) a1)) (*.f64 a2 a2))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (/.f64 a2 a1) a1)) (*.f64 a2 a2))
(/ (+ (* a1 (sqrt 2)) (/ (* (pow a2 2) (sqrt 2)) a1)) (pow a2 2))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (/.f64 a2 a1) a1)) (*.f64 a2 a2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (sqrt 1/2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (sqrt 2) a1)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 (/.f64 (/.f64 a1 a2) a2) a1 #s(literal 1 binary64)) (cos.f64 th))) (*.f64 a2 a2))
(* (pow a2 2) (sqrt 1/2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (sqrt 2) a1)
(/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+ (/ (sqrt 2) a1) (/ (* a1 (sqrt 2)) (pow a2 2)))
(fma.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a1 (sqrt 2)) (pow a2 2))
(*.f64 (/.f64 (/.f64 a1 a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))
(* -1 (* a1 (pow a2 2)))
(*.f64 (neg.f64 a2) (*.f64 a2 a1))

rewrite172.0ms (2%)

Memory
7.5MiB live, 239.7MiB allocated
Rules
4 762×lower-/.f32
4 750×lower-/.f64
4 702×lower-*.f32
4 680×lower-*.f64
3 042×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
062420
099397
1323382
22357382
08498379
Stop Event
iter limit
node limit
iter limit
Counts
27 → 509
Calls
Call 1
Inputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.f64 a2 a2)
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
#s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
(*.f64 a1 a1)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1))))
(+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))
(cos.f64 th)
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
(/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) a1)
(*.f64 (*.f64 a2 a2) (neg.f64 a1))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))) (neg.f64 (-.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (-.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (-.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a1 a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a1 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
(*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (pow.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (pow.f64 (-.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(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))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(*.f64 a2 a2)
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
#s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1))
(*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 a1 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1))
(exp.f64 (fma.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (*.f64 (log.f64 a1) #s(literal 2 binary64))))
(exp.f64 (fma.f64 (log.f64 a1) #s(literal 2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1)
(*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))
(*.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))
(*.f64 (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (pow.f64 (pow.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))))
(*.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))))
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))))
(pow.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))))
(/.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))))
(neg.f64 (/.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))) #s(literal -1 binary64)))
(*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)))
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 a1 a1)
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
#s(literal -2 binary64)
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (pow.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) #s(literal -1 binary64)) (pow.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)) #s(literal -1 binary64)))
(*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 #s(literal -2 binary64) (pow.f64 a2 #s(literal -2 binary64)))) (neg.f64 a1))
(*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 1 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(*.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1/2 binary64)) (neg.f64 a1)) (*.f64 a2 a2))
(*.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1/2 binary64)) (*.f64 a2 a2)) (neg.f64 a1))
(*.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1/2 binary64)) a2) (*.f64 (neg.f64 a1) a2))
(*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) a1))
(*.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (pow.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 a2)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)) (pow.f64 (pow.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #s(literal -1 binary64)))
(*.f64 (neg.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (pow.f64 (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a2 #s(literal -2 binary64))) a1) #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (neg.f64 a1) a2) a2) (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1/2 binary64)))
(*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal -2 binary64)) (neg.f64 a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 (neg.f64 a1) a2) a2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))) (neg.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))) (neg.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 1 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a2 #s(literal -2 binary64))) a1))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a2 #s(literal -2 binary64))) a1))
(/.f64 (neg.f64 (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1/2 binary64))) (neg.f64 (/.f64 (pow.f64 a2 #s(literal -2 binary64)) (neg.f64 a1))))
(/.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 (neg.f64 a1) a2) a2)) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1))) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))))
(/.f64 (*.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1))) (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)))
(/.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 1 binary64)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (neg.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)))))
(/.f64 (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1))))
(/.f64 (*.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) #s(literal 1 binary64)) (*.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1))))
(/.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1/2 binary64)) (/.f64 (pow.f64 a2 #s(literal -2 binary64)) (neg.f64 a1)))
(/.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))))
(/.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a2 #s(literal -2 binary64))) a1))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(neg.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 a2 #s(literal -2 binary64))) a1)))
(neg.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) a1)))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) #s(literal -1 binary64)))
(*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (pow.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)) (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)))) (neg.f64 (-.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))))) (neg.f64 (neg.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (neg.f64 (neg.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)))))
(/.f64 (neg.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 a1) (*.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (neg.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (neg.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 a2 a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (neg.f64 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (neg.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (neg.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (neg.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))) (*.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))) (*.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) a1 (*.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (neg.f64 (neg.f64 a1)) (*.f64 a2 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a2 (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) a1 (*.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 #s(literal -1 binary64))) (*.f64 a2 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (neg.f64 a1) (*.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 a1) a2))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) a1 (*.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (neg.f64 (neg.f64 a1)) (*.f64 a2 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a2 (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) a1 (*.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 #s(literal -1 binary64))) (*.f64 a2 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (neg.f64 a1) (*.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 a1) a2))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal -1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (neg.f64 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (neg.f64 a1) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1)))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a1 (*.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (neg.f64 (neg.f64 a1)) (*.f64 a2 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a2 (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a1 (*.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 #s(literal -1 binary64))) (*.f64 a2 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (neg.f64 a1) (*.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 a1) a2))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a1))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 #s(literal 1 binary64))) (*.f64 a2 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal -1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (neg.f64 a1) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1)))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal -1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) #s(literal -1 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) a1 (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 a1)) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) a1 (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 a1) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (neg.f64 a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) a1 (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 a1 a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 a1 (neg.f64 (neg.f64 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 a1))))
(/.f64 (fma.f64 a1 a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 a1 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 a1 (neg.f64 a1) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1)))
(/.f64 (fma.f64 a1 a1 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1))
(/.f64 (fma.f64 a1 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) a2 (*.f64 a1 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 a1 a2))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) a2 (*.f64 a1 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 a1 a2))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 #s(literal 1 binary64) a1))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) a2 (*.f64 a1 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 a1 a2))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 #s(literal 1 binary64)))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 a2) (*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 #s(literal 1 binary64))) (*.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (neg.f64 (neg.f64 a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 (neg.f64 (neg.f64 a1)) a2))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 (neg.f64 (neg.f64 a1)) a2))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (neg.f64 (neg.f64 a1)) a2))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (neg.f64 (neg.f64 a1)) #s(literal 1 binary64))) (*.f64 (neg.f64 (neg.f64 a1)) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) a1)) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) a2 (*.f64 a1 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 a1 a2))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) a2 (*.f64 a1 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 a1 a2))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 #s(literal 1 binary64) a1))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) a2 (*.f64 a1 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 a1 a2))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 #s(literal 1 binary64)))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 a2) (*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 #s(literal 1 binary64))) (*.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -1 binary64) a2 (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a2))
(/.f64 (fma.f64 #s(literal -1 binary64) a2 (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a2))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -1 binary64) a2 (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a2))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (neg.f64 a2) a2 (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
(/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (neg.f64 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 (neg.f64 a1) a2))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (neg.f64 a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 (neg.f64 a1) a2))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (neg.f64 a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (neg.f64 a1) (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (neg.f64 a1) a2))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 a1) (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (neg.f64 a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 a1) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (neg.f64 a1) #s(literal 1 binary64))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) a1)) (*.f64 (neg.f64 a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) a2 (*.f64 a1 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 a1 a2))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) a2 (*.f64 a1 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 a1 a2))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 #s(literal 1 binary64) a1))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) a2 (*.f64 a1 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 a1 a2))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (*.f64 a1 #s(literal 1 binary64)))) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2) (*.f64 a1 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 a1 (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 a1 #s(literal 1 binary64))) (*.f64 a1 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) a1))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) a1)) (*.f64 (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) a1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) a2 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 #s(literal 1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a2) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)))
(/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (neg.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))) (neg.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1))))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 a1) (*.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (neg.f64 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (*.f64 (neg.f64 a1) a2) a2))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (*.f64 a2 a2) a1))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(/.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)) (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))))
(/.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (fma.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1))))
(/.f64 (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))) (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (pow.f64 a1 #s(literal -2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 a2 a2) a1)) a1)) (fma.f64 (pow.f64 a1 #s(literal -3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (pow.f64 a2 #s(literal -2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(fma.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
(fma.f64 (pow.f64 a1 #s(literal -1 binary64)) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
(fma.f64 (pow.f64 a1 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
(fma.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (neg.f64 a1) #s(literal -1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 a1 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal -1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
(fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
(fma.f64 a1 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(-.f64 (/.f64 (/.f64 #s(literal 2 binary64) (*.f64 a1 a1)) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 2 binary64))) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1)) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))
(*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64)))
(cos.f64 th)
#s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) (pow.f64 (pow.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
(/.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(neg.f64 (/.f64 (neg.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #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 (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(literal -1 binary64)))
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
(*.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64)) (pow.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) #s(literal -1 binary64)))
(*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (pow.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/576 binary64) (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))))) (neg.f64 (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) #s(literal 1/576 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64))))
(/.f64 (-.f64 #s(literal 1/576 binary64) (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)))) (-.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64))) (neg.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) (neg.f64 (+.f64 #s(literal 1/576 binary64) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) (neg.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64))))))
(/.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)))))
(/.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (+.f64 #s(literal 1/576 binary64) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))))
(/.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64)) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))))
(fma.f64 (*.f64 #s(literal -1/720 binary64) th) th #s(literal 1/24 binary64))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
(fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))
(fma.f64 th (*.f64 #s(literal -1/720 binary64) th) #s(literal 1/24 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64))) (/.f64 #s(literal 1/576 binary64) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal -1/24 binary64))))
(+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))
(+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (pow.f64 a2 #s(literal -2 binary64)))
(*.f64 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 a1 (*.f64 a2 a2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal -2 binary64)) a1))
(*.f64 a1 (*.f64 (pow.f64 a2 #s(literal -2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2)) (neg.f64 a2))
(/.f64 (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1)) (neg.f64 a2))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1)) (neg.f64 (*.f64 (neg.f64 a2) a2)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a1)) (neg.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (neg.f64 a2))
(/.f64 (neg.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (neg.f64 a2) a2)))
(/.f64 (neg.f64 (*.f64 a1 #s(literal 1 binary64))) (neg.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (neg.f64 (*.f64 (neg.f64 a2) a2)))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) a2)
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) a2)
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) a2))
(/.f64 (*.f64 #s(literal 1 binary64) a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(/.f64 (*.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) a2))
(/.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (neg.f64 a2) a2))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 a2 a2))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 (neg.f64 a1) (neg.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal -1 binary64)) a1)
(*.f64 (*.f64 (neg.f64 a1) a2) a2)
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a2 a2) a1))
(*.f64 (*.f64 (neg.f64 a2) a2) a1)
(*.f64 (neg.f64 a1) (*.f64 a2 a2))
(*.f64 (*.f64 a2 a2) (neg.f64 a1))
(*.f64 a2 (*.f64 (neg.f64 a1) a2))
(neg.f64 (*.f64 (*.f64 a2 a2) a1))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) a1))

eval135.0ms (1.6%)

Memory
-22.4MiB live, 249.8MiB allocated
Compiler

Compiled 27 672 to 1 856 computations (93.3% saved)

prune226.0ms (2.6%)

Memory
-3.2MiB live, 280.1MiB allocated
Pruning

38 alts after pruning (33 fresh and 5 done)

PrunedKeptTotal
New1 149141 163
Fresh81927
Picked235
Done022
Total1 159381 197
Accuracy
100.0%
Counts
1 197 → 38
Alt Table
Click to see full alt table
StatusAccuracyProgram
15.4%
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (fma.f64 #s(approx (+ (* -1/720 (* th th)) 1/24) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
12.6%
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
68.1%
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
99.3%
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
15.4%
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))))
29.3%
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))))
99.7%
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
68.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
68.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
68.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)))))
63.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
68.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))))
45.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))))
18.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))))
15.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (/.f64 a2 a1) a1)) (*.f64 a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))))
16.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 (/.f64 a2 a1) a1)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
61.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 a1)))))
65.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
61.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a2 a2) a1))))
66.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))))
63.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 a1 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)))
99.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
64.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
65.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
67.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
67.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (/ (* (sqrt 2) (neg (sqrt 2))) (* (* a2 a2) (neg a1)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
12.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (/ (sqrt 2) a1) (* (/ (sqrt 2) (* a2 a2)) a1)) (/ (* (sqrt 2) (neg (sqrt 2))) (* (* a2 a2) (neg a1)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
99.7%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
65.3%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))))
66.0%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
68.2%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
99.7%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)))
99.4%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
67.9%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
12.6%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 1/2 binary64))))
99.3%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)) (cos.f64 th)))
67.8%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)))
12.6%
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
Compiler

Compiled 1 996 to 607 computations (69.6% saved)

regimes225.0ms (2.6%)

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

8 calls:

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

Compiled 59 to 40 computations (32.2% saved)

regimes173.0ms (2%)

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

8 calls:

51.0ms
(*.f64 a1 a1)
20.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
19.0ms
a2
18.0ms
th
17.0ms
a1
Results
AccuracySegmentsBranch
99.7%1a1
99.7%1a2
99.7%1th
99.7%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
99.7%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.7%1(cos.f64 th)
99.7%1(*.f64 a1 a1)
99.7%1(*.f64 a2 a2)
Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes156.0ms (1.8%)

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

8 calls:

42.0ms
(cos.f64 th)
19.0ms
a1
16.0ms
th
15.0ms
(*.f64 a2 a2)
15.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
99.4%1a1
99.4%1a2
99.4%1th
99.4%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
99.4%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.4%1(cos.f64 th)
99.4%1(*.f64 a1 a1)
99.4%1(*.f64 a2 a2)
Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes140.0ms (1.6%)

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

8 calls:

24.0ms
(*.f64 a1 a1)
21.0ms
th
17.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
17.0ms
a1
15.0ms
a2
Results
AccuracySegmentsBranch
99.3%1a1
99.3%1a2
99.3%1th
99.3%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
99.3%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.3%1(cos.f64 th)
99.3%1(*.f64 a1 a1)
99.3%1(*.f64 a2 a2)
Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes146.0ms (1.7%)

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

8 calls:

36.0ms
a2
19.0ms
(*.f64 a1 a1)
16.0ms
th
16.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
15.0ms
a1
Results
AccuracySegmentsBranch
72.3%2th
69.7%2a1
68.2%1a2
79.8%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)))
79.3%2(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
79.3%2(cos.f64 th)
69.7%2(*.f64 a1 a1)
68.2%1(*.f64 a2 a2)
Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes54.0ms (0.6%)

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

8 calls:

15.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
8.0ms
a2
5.0ms
th
5.0ms
a1
5.0ms
(*.f64 a2 a2)
Results
AccuracySegmentsBranch
68.2%1a2
68.2%1(*.f64 a2 a2)
68.2%1a1
68.2%1(*.f64 a1 a1)
68.2%1th
68.2%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
68.2%1(cos.f64 th)
68.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)

regimes19.0ms (0.2%)

Memory
5.6MiB live, 43.8MiB allocated
Counts
4 → 1
Calls
Call 1
Inputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
Outputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
Calls

8 calls:

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

Compiled 59 to 40 computations (32.2% saved)

regimes16.0ms (0.2%)

Memory
-0.8MiB live, 37.3MiB allocated
Counts
3 → 1
Calls
Call 1
Inputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 1/2 binary64))))
Outputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)))
Calls

8 calls:

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

Compiled 59 to 40 computations (32.2% saved)

regimes10.0ms (0.1%)

Memory
26.6MiB live, 26.6MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
Outputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
Calls

8 calls:

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

Compiled 59 to 40 computations (32.2% saved)

bsearch4.0ms (0.1%)

Memory
-41.7MiB live, 1.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-4.537646000709314e-180
-1.8599003302917926e-182
Compiler

Compiled 25 to 18 computations (28% saved)

simplify24.0ms (0.3%)

Memory
18.1MiB live, 56.1MiB allocated
Algorithm
egg-herbie
Rules
28×*-commutative-binary64-*.f64
1-exp-binary32-exp.f32
1-exp-binary64-exp.f64
+-commutative-binary64-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
056307
174307
Stop Event
saturated
Calls
Call 1
Inputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)) (cos.f64 th)))
(if (<=.f64 (+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) #s(literal -583992399055641/145998099763910246996517491382409322396583312231953917778534160572776805350677676368189209962155884792916553906355021033942038551084014015944085162231110854024063829579528478402651974151891320832 binary64)) #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (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 1/2 binary64))))) #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))
Outputs
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (cos.f64 th)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 a2 a2)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)) (cos.f64 th)))
(if (<=.f64 (+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) #s(literal -583992399055641/145998099763910246996517491382409322396583312231953917778534160572776805350677676368189209962155884792916553906355021033942038551084014015944085162231110854024063829579528478402651974151891320832 binary64)) #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (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 1/2 binary64))))) #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))))
(if (<=.f64 (+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -583992399055641/145998099763910246996517491382409322396583312231953917778534160572776805350677676368189209962155884792916553906355021033942038551084014015944085162231110854024063829579528478402651974151891320832 binary64)) #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))) #s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2)))
#s(approx (* (pow 2 -1/2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) #s(approx (* (+ (* a1 a1) (* a2 a2)) (sqrt 1/2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1)))

soundness897.0ms (10.4%)

Memory
21.9MiB live, 691.4MiB allocated
Rules
17 450×lower-fma.f64
17 450×lower-fma.f32
14 556×lower-fma.f64
14 556×lower-fma.f32
6 176×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02037416
16556588
223796366
368646138
477146126
080375696
02087140
17206179
227415876
376685730
081155272
051359
081345
1289331
22307331
08295328
01244
02038
15838
241138
3733138
0843437
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 647 to 318 computations (50.9% saved)

preprocess187.0ms (2.2%)

Memory
-10.9MiB live, 231.2MiB allocated
Remove

(abs a2)

(sort a1 a2)

(abs a1)

(abs th)

Compiler

Compiled 1 110 to 592 computations (46.7% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...