Migdal et al, Equation (64)

Time bar (total: 12.7s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage

analyze0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
1×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.4s (10.7%)

Memory
13.2MiB live, 1 665.0MiB allocated; 206ms collecting garbage
Samples
985.0ms8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 720.0ms
ival-mult: 289.0ms (40.2% of total)
ival-cos: 232.0ms (32.2% of total)
ival-sqrt: 71.0ms (9.9% of total)
ival-div: 62.0ms (8.6% of total)
ival-add: 44.0ms (6.1% of total)
ival-true: 7.0ms (1% of total)
exact: 7.0ms (1% of total)
ival-assert: 4.0ms (0.6% of total)
adjust: 3.0ms (0.4% of total)
Bogosity

explain137.0ms (1.1%)

Memory
-6.5MiB live, 198.1MiB allocated; 14ms collecting garbage
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
54.0ms512×0valid
Compiler

Compiled 135 to 40 computations (70.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-cos: 13.0ms (36.6% of total)
ival-mult: 12.0ms (33.8% of total)
ival-sqrt: 4.0ms (11.3% of total)
ival-div: 3.0ms (8.4% of total)
ival-add: 2.0ms (5.6% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

preprocess251.0ms (2%)

Memory
29.1MiB live, 206.8MiB allocated; 25ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
040120
1163120
2592120
31529120
42996120
54325120
66209120
01219
02013
15213
217313
354513
4108813
5159113
6227013
7361213
8608113
0809712
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Outputs
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (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 19 to 12 computations (36.8% saved)

eval0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler

Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶99.5%
(+.f64 (*.f64 (/.f64 (cos.f64 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 19 to 12 computations (36.8% saved)

simplify1.4s (10.8%)

Memory
-156.5MiB live, 507.3MiB allocated; 1.3s collecting garbage
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-diff7
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01256
02050
15250
217350
354550
4108850
5159150
6227050
7361250
8608150
0809749
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a1 a1)
a1
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 a2 a2)
a2
Outputs
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (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

localize66.0ms (0.5%)

Memory
25.1MiB live, 72.0MiB allocated; 3ms collecting garbage
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.00390625
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
accuracy0.185878759768442
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
accuracy0.23046875
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
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: 35.0ms
ival-cos: 14.0ms (39.7% of total)
ival-mult: 11.0ms (31.2% of total)
ival-div: 4.0ms (11.3% of total)
ival-sqrt: 3.0ms (8.5% of total)
ival-add: 2.0ms (5.7% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series102.0ms (0.8%)

Memory
-13.8MiB live, 38.2MiB allocated; 6ms collecting garbage
Counts
5 → 29
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
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole 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)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole 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)))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole 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)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
Calls

9 calls:

TimeVariablePointExpression
70.0ms
a2
@-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)))
7.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)))
5.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)))
5.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)))
4.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)))

simplify435.0ms (3.4%)

Memory
-2.1MiB live, 186.3MiB allocated; 17ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0145829
1455797
22022728
08497682
Stop Event
1×iter limit
1×node limit
Counts
29 → 29
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole 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)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole 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)))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole 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)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#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)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#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 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.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))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (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 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole 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)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (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)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #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)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole 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)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 #s(literal -1/720 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #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)))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (cos th) (fma.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal -1/720 binary64) (-.f64 (*.f64 #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)) (* a2 a2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (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 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole 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)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (cos th) (cos.f64 th))

rewrite459.0ms (3.6%)

Memory
34.0MiB live, 162.2MiB allocated; 34ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01244
02038
17238
250538
3707938
0882237
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
5 → 236
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 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 a1 a1))))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64))))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (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 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 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 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (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 (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))))
(*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (cos.f64 th) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 a2 #s(literal 6 binary64)) (pow.f64 a1 #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 (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 6 binary64)) (pow.f64 a1 #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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.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 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.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)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))) (fma.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.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 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))) (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.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)) (*.f64 #s(literal 2 binary64) (*.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)) (*.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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.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)) (*.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 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))))))))
(/.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 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))) (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 a2 #s(literal 6 binary64)) (pow.f64 a1 #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 a2 #s(literal 6 binary64)) (pow.f64 a1 #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 (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 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 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 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 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 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 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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))) (*.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(/.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)))) #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)) 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 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)))) #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)) 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 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64))) (*.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 9 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 9 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 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 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 2 binary64) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.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 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(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))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #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))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (neg.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 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (fabs.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fabs.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.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))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(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 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.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)))))
(fma.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #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))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(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))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #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))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.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 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (fabs.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (fabs.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (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 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (pow.f64 a1 #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (pow.f64 a1 #s(literal 6 binary64)) (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a1 (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 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (*.f64 (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)))))
(fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (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 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(fma.f64 (*.f64 a1 a1) (/.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(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))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 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 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)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.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)) (*.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 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #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 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.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 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 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 (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 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(*.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.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 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (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 (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 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (cos.f64 th)))) (-.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th)) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 #s(literal 1 binary64) (cos.f64 th))))))
(neg.f64 (neg.f64 (cos.f64 th)))
(fma.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 th)))
(fma.f64 #s(literal 0 binary64) (sin.f64 th) (*.f64 #s(literal 1 binary64) (cos.f64 th)))
(fma.f64 (sin.f64 th) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 th)))
(fma.f64 #s(literal 1 binary64) (cos.f64 th) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(fma.f64 (cos.f64 th) #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th)) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th) (PI.f64)) (PI.f64)))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))
(-.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) #s(literal 1 binary64)))
(cos.f64 (+.f64 (+.f64 (neg.f64 th) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (PI.f64) th) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th) (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 th)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a2 (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 (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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a2))
(*.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2)
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (cos.f64 th) (*.f64 a2 (/.f64 a2 (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 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))

eval88.0ms (0.7%)

Memory
-8.0MiB live, 48.2MiB allocated; 16ms collecting garbage
Compiler

Compiled 11 231 to 898 computations (92% saved)

prune39.0ms (0.3%)

Memory
-20.4MiB live, 25.2MiB allocated; 6ms collecting garbage
Pruning

14 alts after pruning (14 fresh and 0 done)

PrunedKeptTotal
New29114305
Fresh000
Picked101
Done000
Total29214306
Accuracy
100.0%
Counts
306 → 14
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.3%
(/.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)))) #s(literal 2 binary64))
99.3%
(/.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))
▶99.6%
(/.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)))
99.6%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
28.4%
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.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)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
▶99.5%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
99.5%
(*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
99.6%
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
▶49.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
39.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
▶68.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
▶56.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 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
62.3%
#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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
99.0%
#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 804 to 480 computations (40.3% saved)

simplify291.0ms (2.3%)

Memory
8.0MiB live, 94.1MiB allocated; 22ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(/.f64 a2 a1)
cost-diff0
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
cost-diff0
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
cost-diff0
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 a1 a1)
cost-diff0
(fma.f64 a2 a2 (*.f64 a1 a1))
cost-diff0
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
cost-diff4
(*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))
cost-diff10
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th)))
cost-diff0
(*.f64 a1 a1)
cost-diff0
(fma.f64 a2 a2 (*.f64 a1 a1))
cost-diff0
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
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)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
cost-diff5
(/.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)))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
044440
071424
1171416
2658390
33482384
08081382
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(/.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 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 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
(pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))
#s(literal 2 binary64)
#s(literal 1/4 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th)))
(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)
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))
(*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (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))
#s(literal -1/720 binary64)
#s(literal 1/24 binary64)
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 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)
#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 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
a2
a1
#s(literal 1 binary64)
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) a1)
(cos.f64 th)
th
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(/.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 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 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
(pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))
#s(literal 2 binary64)
#s(literal 1/4 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th)))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (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)
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))
(*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 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)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
#s(literal 1/24 binary64)
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 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)
#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 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
a2
a1
#s(literal 1 binary64)
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))
(*.f64 (cos.f64 th) a1)
(cos.f64 th)
th
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

localize278.0ms (2.2%)

Memory
25.5MiB live, 124.1MiB allocated; 40ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.19140625
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
accuracy0.22265625
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
accuracy0.421875
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy26.17121196630747
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.0
(cos.f64 th)
accuracy0.23046875
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.7389450195368841
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
accuracy2.2968522811307714
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)))
accuracy2.7349180129190747
(*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))
accuracy15.198435578621707
(*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th))
accuracy24.924413649647384
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
accuracy0.0
(*.f64 a1 a1)
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.24675751953688405
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
accuracy20.361014219638374
#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))))
accuracy0.0
(cos.f64 th)
accuracy0.0859375
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
accuracy0.13671875
(/.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)))
accuracy0.14453125
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
Samples
203.0ms256×0valid
Compiler

Compiled 397 to 43 computations (89.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 107.0ms
ival-mult: 46.0ms (42.8% of total)
ival-div: 17.0ms (15.8% of total)
ival-add: 13.0ms (12.1% of total)
const: 11.0ms (10.2% of total)
ival-cos: 10.0ms (9.3% of total)
ival-exp2: 5.0ms (4.7% of total)
ival-sqrt: 3.0ms (2.8% of total)
exact: 1.0ms (0.9% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series486.0ms (3.8%)

Memory
-8.0MiB live, 227.4MiB allocated; 45ms collecting garbage
Counts
23 → 140
Calls
Call 1
Inputs
(/.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 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(fma.f64 a2 a2 (*.f64 a1 a1))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 a1)
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th)))
(*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(*.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)))
#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 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
(cos.f64 th)
(sqrt.f64 #s(literal 2 binary64))
(*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
Outputs
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a2 2) (cos th)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/4 1/4) (* (pow a1 2) (cos th))) (* (pow 1/4 1/4) (* (pow a2 2) (cos th))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (* (pow a2 2) (cos th)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/2 1/4) (* (pow a1 2) (cos th))) (* (pow 1/2 1/4) (* (pow a2 2) (cos th))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (/ (pow a2 2) (pow a1 2))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))))
#s(approx (/ a2 a1) #s(hole binary64 (/ a2 a1)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a1 2) (cos th)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (* (pow a1 2) (cos th)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/2 1/4) (cos th)) (* (pow 1/2 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 1))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (+ 1 (/ (pow a2 2) (pow a1 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/2 1/4) (cos th)) (* (pow 1/2 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* -1/2 (* (pow 1/2 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/2 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/2 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole 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)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole 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)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole 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)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (cos th) (+ (pow a1 2) (pow a2 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
Calls

9 calls:

TimeVariablePointExpression
131.0ms
th
@inf
((/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a1 a1) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (/ (cos th) (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (+ (* (/ a2 a1) (/ a2 a1)) 1) (/ a2 a1) (cos th) (sqrt 2) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (/ a1 (sqrt 2)) (* (* (cos th) a1) (/ a1 (sqrt 2))))
111.0ms
a2
@0
((/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a1 a1) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (/ (cos th) (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (+ (* (/ a2 a1) (/ a2 a1)) 1) (/ a2 a1) (cos th) (sqrt 2) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (/ a1 (sqrt 2)) (* (* (cos th) a1) (/ a1 (sqrt 2))))
97.0ms
a1
@0
((/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a1 a1) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (/ (cos th) (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (+ (* (/ a2 a1) (/ a2 a1)) 1) (/ a2 a1) (cos th) (sqrt 2) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (/ a1 (sqrt 2)) (* (* (cos th) a1) (/ a1 (sqrt 2))))
60.0ms
th
@-inf
((/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a1 a1) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (/ (cos th) (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (+ (* (/ a2 a1) (/ a2 a1)) 1) (/ a2 a1) (cos th) (sqrt 2) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (/ a1 (sqrt 2)) (* (* (cos th) a1) (/ a1 (sqrt 2))))
20.0ms
a1
@inf
((/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a1 a1) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (/ (cos th) (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (+ (* (/ a2 a1) (/ a2 a1)) 1) (/ a2 a1) (cos th) (sqrt 2) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (/ a1 (sqrt 2)) (* (* (cos th) a1) (/ a1 (sqrt 2))))

simplify370.0ms (2.9%)

Memory
-8.9MiB live, 128.1MiB allocated; 22ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05035840
116515303
087514845
Stop Event
1×iter limit
1×node limit
Counts
140 → 140
Calls
Call 1
Inputs
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a2 2) (cos th)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/4 1/4) (* (pow a1 2) (cos th))) (* (pow 1/4 1/4) (* (pow a2 2) (cos th))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (* (pow a2 2) (cos th)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/2 1/4) (* (pow a1 2) (cos th))) (* (pow 1/2 1/4) (* (pow a2 2) (cos th))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (/ (pow a2 2) (pow a1 2))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))))
#s(approx (/ a2 a1) #s(hole binary64 (/ a2 a1)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a1 2) (cos th)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (* (pow a1 2) (cos th)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/2 1/4) (cos th)) (* (pow 1/2 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 1))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (+ 1 (/ (pow a2 2) (pow a1 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/2 1/4) (cos th)) (* (pow 1/2 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* -1/2 (* (pow 1/2 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/2 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/2 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole 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)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole 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)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole 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)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (cos th) (+ (pow a1 2) (pow a2 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
Outputs
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a2 2) (cos th)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/4 1/4) (* (pow a1 2) (cos th))) (* (pow 1/4 1/4) (* (pow a2 2) (cos th))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (* (pow a2 2) (cos th)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2)))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/2 1/4) (* (pow a1 2) (cos th))) (* (pow 1/2 1/4) (* (pow a2 2) (cos th))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* a2 a2) (* a1 a1)) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (*.f64 (*.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))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (* a1 a1) (*.f64 a1 a1))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (/.f64 (*.f64 (*.f64 a2 a2) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (/.f64 (*.f64 (*.f64 a2 a2) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) (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)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (/ (pow a2 2) (pow a1 2))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) (*.f64 (/.f64 a2 a1) (/.f64 a2 a1)))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)))
#s(approx (/ a2 a1) #s(hole binary64 (/ a2 a1)))
#s(approx (/ a2 a1) (/.f64 a2 a1))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (/ a1 (sqrt 2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a1 2) (cos th)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (*.f64 (*.f64 a1 a1) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (/.f64 (cos.f64 th) a1) (/.f64 (*.f64 a2 a2) a1) (cos.f64 th))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (* (pow a1 2) (cos th)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/2 1/4) (cos th)) (* (pow 1/2 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (*.f64 (*.f64 (*.f64 a1 a1) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (fma.f64 (/.f64 (cos.f64 th) a1) (/.f64 (*.f64 a2 a2) a1) (cos.f64 th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a1) a1))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (fma.f64 (/.f64 (cos.f64 th) a1) (/.f64 (*.f64 a2 a2) a1) (cos.f64 th)) (*.f64 a1 a1)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (/.f64 (*.f64 (*.f64 a1 a1) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (+.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a1 a1)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 1))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(literal 1 binary64))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (+ 1 (/ (pow a2 2) (pow a1 2)))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th))) (*.f64 a1 a1)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (/.f64 (*.f64 (*.f64 a1 a1) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (/.f64 (*.f64 (*.f64 a2 a2) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) (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)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 (/.f64 (cos.f64 th) a2) (/.f64 (*.f64 a1 a1) a2) (cos.f64 th))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/2 1/4) (cos th)) (* (pow 1/2 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (*.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (fma.f64 (/.f64 (cos.f64 th) a2) (/.f64 (*.f64 a1 a1) a2) (cos.f64 th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (fma.f64 (/.f64 (cos.f64 th) a2) (/.f64 (*.f64 a1 a1) a2) (cos.f64 th)) (*.f64 a2 a2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (/.f64 (*.f64 (*.f64 a2 a2) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (+.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 a2 a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 a2 a2)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))))
#s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 a2) #s(literal 1 binary64)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th))) (*.f64 a2 a2)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 a2 a2)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (fma.f64 (*.f64 (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) th) th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) th) th) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) th) th))) (*.f64 th th))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* -1/2 (* (pow 1/2 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) th) th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/2 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) th) th))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (+ (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/2 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/2 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) th) th) (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))) (*.f64 th th))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole 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)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (pow.f64 th #s(literal 4 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 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 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (fma.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (fma.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 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.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 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.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 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 th #s(literal 4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(literal 1 binary64))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (+ (* -1/2 (* th th)) 1) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 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 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (fma.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (fma.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 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 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)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole 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)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th 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)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) a1) a1) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (fma.f64 (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a1 a1)) (*.f64 th th)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (fma.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) th) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a1 a1)) (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 th th) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (cos th) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal -1/720 binary64)) #s(literal 1/2 binary64))) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 th th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a1 a1)) (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) #s(hole 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)))))
#s(approx (* (* (cos th) a1) (/ a1 (sqrt 2))) (fma.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 th th) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/4 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) #s(hole binary64 (* (pow 1/2 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (cos th) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (*.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 th #s(literal 4 binary64))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (pow.f64 th #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) th) th))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (sqrt 2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (cos th) (cos.f64 th))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.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)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 4 binary64))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)))

rewrite305.0ms (2.4%)

Memory
4.7MiB live, 95.6MiB allocated; 7ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
044353
071334
1271312
22278312
08285312
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
23 → 801
Calls
Call 1
Inputs
(/.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 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(fma.f64 a2 a2 (*.f64 a1 a1))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 a1)
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th)))
(*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(*.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)))
#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 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
(cos.f64 th)
(sqrt.f64 #s(literal 2 binary64))
(*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
Outputs
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))) (/.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(*.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))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.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/16 binary64)))) (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))))
(/.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 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 (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 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 (*.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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))))
(/.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 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64))))))
(/.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 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 (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 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 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))) (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))) (neg.f64 (cos.f64 th)))) (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))) (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))) (cos.f64 th))) (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))) (sqrt.f64 #s(literal 2 binary64)))))
(/.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 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (*.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) a1)))) #s(literal 2 binary64))
(/.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)))) #s(literal 2 binary64))
(/.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 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.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))))) #s(literal 2 binary64))
(/.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)))) #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 (*.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 a1) (*.f64 (cos.f64 th) 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) (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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.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) (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 (neg.f64 a1) (*.f64 (cos.f64 th) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) 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)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) 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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #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 (*.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #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 (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)))) #s(literal 2 binary64))
(/.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))))) #s(literal 2 binary64))
(/.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)))) #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 (*.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) (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) (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 (/.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/16 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64)))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.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 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 (*.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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th))) (neg.f64 (*.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)))))
(/.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 (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 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a2 #s(literal 4 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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64)))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.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 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 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))) (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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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 (/.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 a1) (*.f64 a2 a2))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a2 #s(literal 4 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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (neg.f64 (neg.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))))
(/.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (*.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 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))) (neg.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 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 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.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)) a1 (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a1) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) 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 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(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 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (cos.f64 th) (*.f64 a2 (/.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 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 (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 a1) (*.f64 a2 a2)))))
(-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 (neg.f64 a1) a1) (/.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 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.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 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 (*.f64 (cos.f64 th) 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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(/.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64)))) (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 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) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 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 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 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)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 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) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 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 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th))) (neg.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)))))
(/.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)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(/.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 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 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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.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 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 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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(fma.f64 (*.f64 (cos.f64 th) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 (*.f64 (cos.f64 th) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(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))
(fma.f64 a1 (*.f64 (cos.f64 th) a1) (*.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 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))))))
(/.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 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 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 (fma.f64 (pow.f64 a2 #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 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 6 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 (-.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 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))))
(/.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 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 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 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 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 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(/.f64 (+.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 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))) (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 (neg.f64 (neg.f64 a1)) a1))
(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 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 a1)))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 (neg.f64 a2)))
(+.f64 (/.f64 (pow.f64 a2 #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 (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 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 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))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 #s(literal 4 binary64) #s(literal 3/4 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 #s(literal 4 binary64) #s(literal 3/4 binary64))))) (neg.f64 (+.f64 (pow.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (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 (neg.f64 (*.f64 a2 a2)) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (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 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) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 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 (-.f64 (pow.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 #s(literal 4 binary64) #s(literal 3/4 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 #s(literal 4 binary64) #s(literal 3/4 binary64)))) (+.f64 (pow.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 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))) (sqrt.f64 #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 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a1) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(-.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.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 (neg.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))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(sqrt.f64 (pow.f64 a1 #s(literal 4 binary64)))
(fabs.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 (neg.f64 a1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 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)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 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)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 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)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 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)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.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 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.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)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.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)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 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 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 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))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 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 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 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 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 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)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 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)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 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 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)) (pow.f64 th #s(literal 3 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))) th (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 th th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(fma.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 th (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64)))) th))
(-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 th #s(literal 4 binary64))))
(-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))))
(-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(+.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(+.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th))
(*.f64 (*.f64 (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th))
(*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)) (pow.f64 th #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))) th)
(*.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 th th))
(*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 4 binary64)))
(*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))))
(*.f64 (*.f64 th th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))))
(*.f64 th (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 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 (neg.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 (-.f64 (*.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 (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))) (*.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 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 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 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 th)) (neg.f64 th) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) th) (*.f64 th #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) th) th #s(literal 1 binary64))
(fma.f64 (neg.f64 th) (*.f64 (neg.f64 th) #s(literal -1/2 binary64)) #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 #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))
(fma.f64 th (*.f64 #s(literal -1/2 binary64) th) #s(literal 1 binary64))
(-.f64 (/.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) th)) th))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 th th)) #s(literal -1/2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))
(+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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))))) (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)))
(+.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)))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))) (/.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(*.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))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.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/16 binary64)))) (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64))))
(/.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 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 (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 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 (*.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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))))
(/.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 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64))))))
(/.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 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 (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 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 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))) (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))) (neg.f64 (cos.f64 th)))) (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))) (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))) (cos.f64 th))) (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))) (sqrt.f64 #s(literal 2 binary64)))))
(/.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 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (*.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) a1)))) #s(literal 2 binary64))
(/.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)))) #s(literal 2 binary64))
(/.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 (cos.f64 th) a1) (neg.f64 a1)))) #s(literal 2 binary64))
(/.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))))) #s(literal 2 binary64))
(/.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)))) #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 (*.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 a1) (*.f64 (cos.f64 th) 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) (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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.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) (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 (neg.f64 a1) (*.f64 (cos.f64 th) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) 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)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) 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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #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 (*.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #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 (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)))) #s(literal 2 binary64))
(/.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))))) #s(literal 2 binary64))
(/.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)))) #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 (*.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) (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) (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 (/.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/16 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64)))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.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 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 (*.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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th))) (neg.f64 (*.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)))))
(/.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 (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 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a2 #s(literal 4 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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64)))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.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 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 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))) (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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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 (/.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 a1) (*.f64 a2 a2))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a2 #s(literal 4 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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (neg.f64 (neg.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))))
(/.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (*.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 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))) (neg.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 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 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.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)) a1 (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a1) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) 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 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(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 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (cos.f64 th) (*.f64 a2 (/.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 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 (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 a1) (*.f64 a2 a2)))))
(-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 (neg.f64 a1) a1) (/.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 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.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 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (-.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))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 (*.f64 (cos.f64 th) 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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.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))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))))
(*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) a1))
(*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (cos.f64 th)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (*.f64 (*.f64 (cos.f64 th) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 (cos.f64 th) a1) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.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 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (cos.f64 th) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)))) (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.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 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.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)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(+.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(fma.f64 (exp.f64 (log.f64 (/.f64 a2 a1))) (exp.f64 (log.f64 (/.f64 a2 a1))) #s(literal 1 binary64))
(fma.f64 (/.f64 (neg.f64 a2) a1) (*.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (neg.f64 a2) a1) (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))
(fma.f64 (neg.f64 a2) (/.f64 a2 (*.f64 (neg.f64 a1) a1)) #s(literal 1 binary64))
(fma.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 a2 a1) (fabs.f64 (*.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))) #s(literal 1 binary64))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))
(fma.f64 a2 (fabs.f64 (/.f64 (/.f64 a2 a1) a1)) #s(literal 1 binary64))
(fma.f64 a2 (/.f64 (/.f64 a2 a1) a1) #s(literal 1 binary64))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (pow.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (neg.f64 a2) a1) (/.f64 a2 a1)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 a1) (/.f64 (neg.f64 a2) a1)))
(+.f64 (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64)))
(+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 a2) a1)) (sqrt.f64 (*.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 a2) a1)) (sqrt.f64 (/.f64 (neg.f64 a2) a1)))
(*.f64 (sqrt.f64 (neg.f64 a2)) (sqrt.f64 (/.f64 a2 (*.f64 (neg.f64 a1) a1))))
(*.f64 (sqrt.f64 (/.f64 a2 a1)) (sqrt.f64 (/.f64 a2 a1)))
(*.f64 (sqrt.f64 a2) (sqrt.f64 (/.f64 a2 (*.f64 a1 a1))))
(*.f64 (sqrt.f64 a2) (sqrt.f64 (/.f64 (/.f64 a2 a1) a1)))
(*.f64 (/.f64 a2 a1) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 a2 a1))
(pow.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))
(pow.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a1))))
(/.f64 (sqrt.f64 (/.f64 (*.f64 (neg.f64 a2) a2) a1)) (sqrt.f64 (neg.f64 a1)))
(/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 a2 a1) a2) #s(literal 1 binary64))) (sqrt.f64 a1))
(/.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) a1)
(/.f64 (sqrt.f64 (*.f64 (neg.f64 a2) (/.f64 a2 a1))) (sqrt.f64 (neg.f64 a1)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 a2 a1) (neg.f64 a2))) (sqrt.f64 (neg.f64 a1)))
(/.f64 (sqrt.f64 (neg.f64 (*.f64 (/.f64 a2 a1) a2))) (sqrt.f64 (neg.f64 a1)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 (*.f64 (neg.f64 a1) a1)))
(/.f64 (sqrt.f64 (*.f64 a2 (neg.f64 a2))) (sqrt.f64 (*.f64 (neg.f64 a1) a1)))
(/.f64 (sqrt.f64 (neg.f64 (*.f64 a2 a2))) (sqrt.f64 (*.f64 (neg.f64 a1) a1)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 a2 a1) a2)) (sqrt.f64 a1))
(/.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a1)))
(/.f64 (neg.f64 a2) (neg.f64 a1))
(/.f64 a2 a1)
(neg.f64 (/.f64 (neg.f64 a2) a1))
(sqrt.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))
(fabs.f64 (/.f64 (neg.f64 a2) a1))
(fabs.f64 (/.f64 a2 a1))
(exp.f64 (/.f64 (log.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 a2 a1)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(fma.f64 (sin.f64 th) #s(literal 0 binary64) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 th) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(sin.f64 (+.f64 (neg.f64 (neg.f64 th)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 th))))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(+.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/8 binary64)) (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64)))
(*.f64 (neg.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)))) (neg.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)))))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/8 binary64)))
(*.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))))
(*.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)))
(pow.f64 #s(literal 16 binary64) #s(literal 1/8 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/16 binary64)) #s(literal 4 binary64))
(pow.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))) #s(literal 2 binary64))
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
(fabs.f64 (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/4 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 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+.f64 (cosh.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)))) (sinh.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)))))
(+.f64 (cosh.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 th)) (neg.f64 th))
(*.f64 (*.f64 (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)) th)
(*.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))
(*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)))
(*.f64 (*.f64 th th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th))
(*.f64 th (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 th th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 th th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (*.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)))
(+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 th th) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 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 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)))) (neg.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (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 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64))) (*.f64 (pow.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) #s(literal 1/13824 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))))) (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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (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)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 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 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (fma.f64 a2 a2 (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (fma.f64 a2 a2 (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/24 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/24 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/24 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 1/24 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 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 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64))) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)))
(/.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (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 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (*.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64))) (*.f64 (pow.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) #s(literal 1/13824 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (*.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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.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)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) (*.f64 (sqrt.f64 #s(literal 2 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 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) th)) th (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/720 binary64)) (*.f64 th th) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) #s(literal -1/720 binary64) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 #s(literal -1/720 binary64) th) (*.f64 th (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))))
(fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 th th) (*.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/24 binary64) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/24 binary64)))
(+.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(+.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.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)))))
(sqrt.f64 (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)))
(*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a1)
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a1))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.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))
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 a1) (*.f64 (cos.f64 th) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) a1) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))

eval312.0ms (2.5%)

Memory
-1.1MiB live, 143.0MiB allocated; 19ms collecting garbage
Compiler

Compiled 61 863 to 4 635 computations (92.5% saved)

prune76.0ms (0.6%)

Memory
26.2MiB live, 73.6MiB allocated; 1ms collecting garbage
Pruning

28 alts after pruning (27 fresh and 1 done)

PrunedKeptTotal
New1 238211 259
Fresh369
Picked415
Done000
Total1 245281 273
Accuracy
100.0%
Counts
1 273 → 28
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.3%
(/.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))
▶99.6%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
65.4%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th)) (sqrt.f64 #s(literal 2 binary64))))
▶99.6%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))))
63.2%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
62.3%
(*.f64 (fma.f64 a2 a2 (*.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))))
68.0%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
63.2%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 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))))))
99.5%
(*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
99.6%
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
98.9%
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
99.0%
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
40.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
▶49.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
▶68.0%
#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 a2 (sqrt.f64 #s(literal 2 binary64))))))
49.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
67.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
67.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
✓68.0%
#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))))
53.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
67.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
▶14.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
56.4%
#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 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))))
39.8%
#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 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
50.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
62.3%
#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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
99.0%
#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)))))
42.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 a2) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
Compiler

Compiled 1 767 to 1 084 computations (38.7% saved)

simplify141.0ms (1.1%)

Memory
1.1MiB live, 58.3MiB allocated; 18ms collecting garbage
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
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
cost-diff3
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th)))
cost-diff4
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
cost-diff3
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (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)) (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 (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
(*.f64 a1 a1)
cost-diff0
(fma.f64 a2 a2 (*.f64 a1 a1))
cost-diff0
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))))
cost-diff2
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
049461
079434
1166428
2587418
32793412
08171410
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(cos.f64 th)
th
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))
#s(literal 4 binary64)
#s(literal 1/8 binary64)
#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 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th)))
(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)
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 (/.f64 #s(approx (+ (* a2 a2) (* 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 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))
(*.f64 a2 a2)
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
#s(literal 1/24 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 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(/.f64 (cos.f64 th) (pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64)))
(cos.f64 th)
th
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64))
#s(literal 4 binary64)
#s(literal 1/8 binary64)
#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 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th)))
(/.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 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)
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
(*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))
(*.f64 a2 a2)
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
#s(literal 1/24 binary64)
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (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)

localize180.0ms (1.4%)

Memory
-9.9MiB live, 81.4MiB allocated; 6ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.0
(cos.f64 th)
accuracy0.0859375
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
accuracy0.26400375976844204
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
accuracy2.2968522811307714
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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)))
accuracy2.7349180129190747
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
accuracy15.198435578621707
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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))
accuracy24.924413649647384
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
accuracy0.16796875
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
accuracy0.40234375
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy0.421875
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy20.361014219638374
#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 a2 (sqrt.f64 #s(literal 2 binary64))))))
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.24675751953688405
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
accuracy20.361014219638374
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
accuracy53.25509219530748
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
accuracy0.0
(cos.f64 th)
accuracy0.23046875
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))))
accuracy0.7389450195368841
(/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
accuracy1.0
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))
Samples
138.0ms256×0valid
Compiler

Compiled 384 to 43 computations (88.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 58.0ms
ival-mult: 21.0ms (36.4% of total)
ival-div: 8.0ms (13.9% of total)
ival-add: 7.0ms (12.1% of total)
const: 7.0ms (12.1% of total)
ival-cos: 6.0ms (10.4% of total)
ival-pow: 4.0ms (6.9% of total)
ival-pow2: 3.0ms (5.2% of total)
ival-sqrt: 2.0ms (3.5% of total)
exact: 1.0ms (1.7% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series125.0ms (1%)

Memory
-14.5MiB live, 82.7MiB allocated; 8ms collecting garbage
Counts
23 → 116
Calls
Call 1
Inputs
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 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 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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))
(/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(cos.f64 th)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 (/.f64 #s(approx (+ (* a2 a2) (* 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)))
Outputs
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a2 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (* (pow a1 2) (cos th))) (* (pow 1/4 1/4) (* (pow a2 2) (cos th))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a1 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (/ a2 (sqrt 2)) #s(hole binary64 (/ a2 (sqrt 2))))
#s(approx (* a2 (/ a2 (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole 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)))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (pow 1/4 1/4)))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (pow th 2))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* 1/24 (* (pow 1/4 1/4) (pow th 2))))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (pow th 2))) (* 1/24 (pow 1/4 1/4)))))) (pow 1/4 1/4))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (cos th) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (* (pow 1/4 1/4) (cos th))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
Calls

9 calls:

TimeVariablePointExpression
51.0ms
th
@-inf
((pow (pow 4 1/8) 2) (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a1 (sqrt 2)) (sqrt 2) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (/ (cos th) (pow (pow 4 1/8) 2)) (cos th) (/ a2 (sqrt 2)) (* a2 (/ a2 (sqrt 2))) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)))
18.0ms
a2
@0
((pow (pow 4 1/8) 2) (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a1 (sqrt 2)) (sqrt 2) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (/ (cos th) (pow (pow 4 1/8) 2)) (cos th) (/ a2 (sqrt 2)) (* a2 (/ a2 (sqrt 2))) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)))
17.0ms
th
@inf
((pow (pow 4 1/8) 2) (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a1 (sqrt 2)) (sqrt 2) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (/ (cos th) (pow (pow 4 1/8) 2)) (cos th) (/ a2 (sqrt 2)) (* a2 (/ a2 (sqrt 2))) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)))
6.0ms
a2
@-inf
((pow (pow 4 1/8) 2) (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a1 (sqrt 2)) (sqrt 2) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (/ (cos th) (pow (pow 4 1/8) 2)) (cos th) (/ a2 (sqrt 2)) (* a2 (/ a2 (sqrt 2))) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)))
6.0ms
a2
@inf
((pow (pow 4 1/8) 2) (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ a1 (sqrt 2)) (sqrt 2) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (/ (cos th) (pow (pow 4 1/8) 2)) (cos th) (/ a2 (sqrt 2)) (* a2 (/ a2 (sqrt 2))) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)))

simplify206.0ms (1.6%)

Memory
13.2MiB live, 101.5MiB allocated; 8ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04164825
113524313
279374313
081003919
Stop Event
1×iter limit
1×node limit
Counts
116 → 116
Calls
Call 1
Inputs
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a2 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (* (pow a1 2) (cos th))) (* (pow 1/4 1/4) (* (pow a2 2) (cos th))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a1 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (/ a2 (sqrt 2)) #s(hole binary64 (/ a2 (sqrt 2))))
#s(approx (* a2 (/ a2 (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole 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)))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (pow 1/4 1/4)))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (pow th 2))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* 1/24 (* (pow 1/4 1/4) (pow th 2))))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (pow th 2))) (* 1/24 (pow 1/4 1/4)))))) (pow 1/4 1/4))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (cos th) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (* (pow 1/4 1/4) (cos th))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
Outputs
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a2 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (* (pow a1 2) (cos th))) (* (pow 1/4 1/4) (* (pow a2 2) (cos th))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (cos.f64 th)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* a2 a2) (* a1 a1)) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (* a1 a1) (*.f64 a1 a1))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (*.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))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#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)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (/ a1 (sqrt 2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#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)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a1 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) a1) a1) (fma.f64 (/.f64 (cos.f64 th) a1) (/.f64 (*.f64 a2 a2) a1) (cos.f64 th))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (*.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))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (/.f64 a2 a1) (/.f64 a2 a1)) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1)))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a1) a1))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (fma.f64 (/.f64 (cos.f64 th) a1) (/.f64 (*.f64 a2 a2) a1) (cos.f64 th)) (*.f64 a1 a1)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th))) (*.f64 a1 a1)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (/.f64 a2 (*.f64 a1 a1)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (/ a2 (sqrt 2)) #s(hole binary64 (/ a2 (sqrt 2))))
#s(approx (/ a2 (sqrt 2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* a2 (/ a2 (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* a2 (/ a2 (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) a2) a2) (fma.f64 (/.f64 (*.f64 a1 a1) a2) (/.f64 (cos.f64 th) a2) (cos.f64 th))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (/.f64 a1 a2) (/.f64 a1 a2)) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 a2)))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (fma.f64 (/.f64 (*.f64 a1 a1) a2) (/.f64 (cos.f64 th) a2) (cos.f64 th)) (*.f64 a2 a2)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th))) (*.f64 a2 a2)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (/.f64 a1 (*.f64 a2 a2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) th) th) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (fma.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) th) th) (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))) (*.f64 th th))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 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 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (fma.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (fma.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 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th 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 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.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 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(literal 1 binary64))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (+ (* -1/2 (* th th)) 1) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 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 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (fma.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (fma.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 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole 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)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (pow 1/4 1/4)))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (pow th 2))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) th) th (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* 1/24 (* (pow 1/4 1/4) (pow th 2))))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) th) th (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (*.f64 th th) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (pow th 2))) (* 1/24 (pow 1/4 1/4)))))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (pow.f64 th #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) th) th (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (*.f64 th th) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (cos th) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal -1/720 binary64)) #s(literal 1/2 binary64))) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 th th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (cos.f64 th)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 6 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 6 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 th #s(literal 4 binary64))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.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))) (pow.f64 th #s(literal 6 binary64)))))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) th) th))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#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)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) #s(hole binary64 (* (cos th) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (* (pow 1/4 1/4) (cos th))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th)))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (cos th) (cos.f64 th))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.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)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 4 binary64))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) th) th) (/.f64 #s(literal -1/720 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)))

rewrite246.0ms (1.9%)

Memory
-12.9MiB live, 128.2MiB allocated; 13ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
049362
078331
1277319
22187310
09305308
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
23 → 917
Calls
Call 1
Inputs
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64))))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 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 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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))
(/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(cos.f64 th)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 (/.f64 #s(approx (+ (* a2 a2) (* 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)))
Outputs
(*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (neg.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (neg.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))))
(*.f64 (fabs.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (fabs.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)) #s(literal 1 binary64)) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)))
(*.f64 (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(*.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)) (pow.f64 (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)) (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)))
(*.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/8 binary64)))
(pow.f64 #s(literal 256 binary64) #s(literal 1/16 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) #s(literal 2 binary64))
(pow.f64 #s(literal 16 binary64) #s(literal 1/8 binary64))
(pow.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)) #s(literal 4 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(sqrt.f64 #s(literal 2 binary64))
(fabs.f64 (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 16 binary64)) #s(literal 1/8 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 #s(literal 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 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/4 binary64))) (sinh.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/4 binary64))))
(+.f64 (cosh.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64)))) (sinh.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (/.f64 (cos.f64 th) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))))
(*.f64 (/.f64 (neg.f64 (cos.f64 th)) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64))))
(*.f64 (/.f64 (cos.f64 th) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (cos.f64 th) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (/.f64 (neg.f64 (cos.f64 th)) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (/.f64 (cos.f64 th) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (/.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 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.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 (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 (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 (cos.f64 th) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(*.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))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(/.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 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 (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 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 (*.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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 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)) (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))))
(/.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 (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 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (neg.f64 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (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))) #s(literal 2 binary64))))))
(/.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 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th)))) (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))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.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 (-.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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 a1) (*.f64 a2 a2)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 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 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #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 (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))) #s(literal 2 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 (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))) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 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 (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))) #s(literal 2 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 (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))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.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))))) #s(literal 2 binary64))
(/.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)))) #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 (*.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) (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) (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 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #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 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #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 (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)))) #s(literal 2 binary64))
(/.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))))) #s(literal 2 binary64))
(/.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)))) #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 (*.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) (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) (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 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.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 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 (*.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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 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)) (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.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 (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 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (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))) #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))) (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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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 (/.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 a1) (*.f64 a2 a2))))
(/.f64 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (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))) #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(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 (cos.f64 th) (neg.f64 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 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 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 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 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.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)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #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)) (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))) (/.f64 (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 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)) (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 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 a1) (*.f64 a2 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 a1) (*.f64 a2 a2)))))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #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 (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))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (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 (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))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (+.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (+.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 a2 (neg.f64 a1))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 (*.f64 (+.f64 a2 a1) (-.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 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))))))
(/.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 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 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 (fma.f64 (pow.f64 a2 #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 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 6 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 (-.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 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))))
(/.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 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 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 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 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 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(/.f64 (+.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 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))) (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 a2) (neg.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 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 a2 a2 (*.f64 a1 a1))
(-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.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 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 a1)))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 (neg.f64 a2)))
(+.f64 (/.f64 (pow.f64 a2 #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 (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 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.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 (neg.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))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(sqrt.f64 (pow.f64 a1 #s(literal 4 binary64)))
(fabs.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 (neg.f64 a1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (-.f64 (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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 a1) a1 (*.f64 (neg.f64 a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 a1) a1 (*.f64 a2 (neg.f64 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 a2) a2 (*.f64 (neg.f64 a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 (neg.f64 a2) (*.f64 (neg.f64 a1) 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 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 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (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 (neg.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (/.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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.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 a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (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 a1 a2) #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 a2 #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 a1 a2) #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #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))) (*.f64 (neg.f64 a2) a2))) #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))) (*.f64 a2 (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (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 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)) (*.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) (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 (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))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.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 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 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 (-.f64 (*.f64 (neg.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))) #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 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (/.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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.f64 a2 (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 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (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))) (pow.f64 #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 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))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.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 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.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))) (pow.f64 #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #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 6 binary64)) (pow.f64 a2 #s(literal 6 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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (neg.f64 (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 (neg.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 (/.f64 (neg.f64 (neg.f64 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 (neg.f64 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (neg.f64 (neg.f64 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 (neg.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 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.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 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 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a1 (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 (fabs.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (neg.f64 a1) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a1) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(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))) a1 (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (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))
(fma.f64 a1 (fabs.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (fabs.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a1 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a2 (fabs.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 a2 (fabs.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(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 (pow.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (+.f64 (/.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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.f64 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)) (+.f64 (/.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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 4 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)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.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 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (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 a1 a2) #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)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+.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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.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)))))
(sqrt.f64 (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)))
(*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (neg.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (neg.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))))
(*.f64 (fabs.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (fabs.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)) #s(literal 1 binary64)) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)))
(*.f64 (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(*.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)) (pow.f64 (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)) (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)))
(*.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/8 binary64)))
(pow.f64 #s(literal 256 binary64) #s(literal 1/16 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) #s(literal 2 binary64))
(pow.f64 #s(literal 16 binary64) #s(literal 1/8 binary64))
(pow.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)) #s(literal 4 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(sqrt.f64 #s(literal 2 binary64))
(fabs.f64 (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 16 binary64)) #s(literal 1/8 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 #s(literal 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 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/4 binary64))) (sinh.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/4 binary64))))
(+.f64 (cosh.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64)))) (sinh.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (pow.f64 th #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th))
(*.f64 (*.f64 (*.f64 th th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th))
(*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th)) (pow.f64 th #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))) th)
(*.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))))
(*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 th th))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 4 binary64)))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))))
(*.f64 (*.f64 th th) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))))
(*.f64 th (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 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)) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #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 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 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))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #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 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (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)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #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/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #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/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/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))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 #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 a1 a2) #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 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 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))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #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 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.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 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #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 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 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 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #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 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (*.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 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.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 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #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/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #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/2 binary64) (*.f64 th th)) #s(literal 1 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #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 a1 a2) #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 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #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 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (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 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (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 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (pow.f64 th #s(literal 4 binary64)) (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))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(fma.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 th th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th)) (pow.f64 th #s(literal 3 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))) th (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(fma.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 th th) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 4 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 th th)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(fma.f64 th (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #s(literal 3 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))))))
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64)))) th))
(-.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 th #s(literal 4 binary64))))
(-.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))))
(-.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
(-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(+.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #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 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 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 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 #s(literal -1/2 binary64) (*.f64 th th)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) #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 #s(literal -1/2 binary64) (*.f64 th th)))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.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 #s(literal -1/2 binary64) (*.f64 th th))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 #s(literal -1/2 binary64) (*.f64 th th)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 th)) (neg.f64 th) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) th) (*.f64 th #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) th) th #s(literal 1 binary64))
(fma.f64 (neg.f64 th) (*.f64 (neg.f64 th) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #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))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 th (*.f64 #s(literal -1/2 binary64) th) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(-.f64 (/.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) th)) th))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 th th)) #s(literal -1/2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))
(+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (pow.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) #s(literal -1 binary64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(*.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (/.f64 (cos.f64 th) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))))
(*.f64 (/.f64 (neg.f64 (cos.f64 th)) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64))))
(*.f64 (/.f64 (cos.f64 th) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (cos.f64 th) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (/.f64 (neg.f64 (cos.f64 th)) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (/.f64 (cos.f64 th) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (/.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 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.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 (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 (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 (cos.f64 th) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(*.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))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(/.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 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 (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 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 (*.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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 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)) (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))))
(/.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 (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 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (neg.f64 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (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))) #s(literal 2 binary64))))))
(/.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 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th)))) (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))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.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 (-.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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 a1) (*.f64 a2 a2)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 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 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #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 (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))) #s(literal 2 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 (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))) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 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 (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))) #s(literal 2 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 (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))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.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))))) #s(literal 2 binary64))
(/.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)))) #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 (*.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) (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) (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 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #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 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #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 (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)))) #s(literal 2 binary64))
(/.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))))) #s(literal 2 binary64))
(/.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)))) #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 (*.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) (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) (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 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.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 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 (*.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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 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)) (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.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 (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 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (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))) #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))) (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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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 (/.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 a1) (*.f64 a2 a2))))
(/.f64 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (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))) #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(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 (cos.f64 th) (neg.f64 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 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 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 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 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.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)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #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)) (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))) (/.f64 (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 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)) (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 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 a1) (*.f64 a2 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 a1) (*.f64 a2 a2)))))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #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 (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))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (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 (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))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (cos.f64 th) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (cos.f64 th) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (cos.f64 th) (-.f64 a2 (neg.f64 a1))))
(*.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 (/.f64 (cos.f64 th) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (cos.f64 th) (+.f64 (neg.f64 a2) a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (cos.f64 th) (+.f64 a2 (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.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 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(/.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 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 (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 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 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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(fma.f64 (*.f64 (cos.f64 th) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 (*.f64 (cos.f64 th) a1) a1 (*.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 (*.f64 (cos.f64 th) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 (cos.f64 th) a1) a1))
(fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1))
(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 (neg.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 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) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))
(/.f64 (neg.f64 (neg.f64 (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.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))))
(fma.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(fma.f64 (sin.f64 th) #s(literal 0 binary64) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 th) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(sin.f64 (+.f64 (neg.f64 (neg.f64 th)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 th))))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(+.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #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 (neg.f64 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.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)))))
(sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))
(*.f64 (/.f64 (neg.f64 (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (fabs.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2)
(*.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 a2 (fabs.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (fabs.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 a2 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a2 a2) (fabs.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))
(fabs.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fabs.f64 (*.f64 (/.f64 a2 (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))))
(*.f64 (/.f64 (*.f64 th th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 th th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 th)) (neg.f64 th))
(*.f64 (*.f64 (*.f64 th th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))
(*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th)) th)
(*.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)))
(*.f64 (*.f64 th th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th))
(*.f64 th (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th)))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 th th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 th th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)))
(+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (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 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) #s(literal 3 binary64)) #s(literal -1/373248000 binary64) (*.f64 (pow.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) #s(literal 1/13824 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (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)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (neg.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 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 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))
(/.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (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 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) #s(literal 3 binary64)) #s(literal -1/373248000 binary64) (*.f64 (pow.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) #s(literal 1/13824 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (*.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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.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)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) (*.f64 (sqrt.f64 #s(literal 2 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 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) th)) th (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/720 binary64)) (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal -1/720 binary64) th) (*.f64 th (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 th th) (*.f64 #s(literal -1/720 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 th th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/24 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))

eval287.0ms (2.3%)

Memory
35.0MiB live, 173.1MiB allocated; 34ms collecting garbage
Compiler

Compiled 49 463 to 3 680 computations (92.6% saved)

prune104.0ms (0.8%)

Memory
-22.7MiB live, 116.9MiB allocated; 11ms collecting garbage
Pruning

32 alts after pruning (30 fresh and 2 done)

PrunedKeptTotal
New97516991
Fresh81422
Picked415
Done011
Total987321 019
Accuracy
100.0%
Counts
1 019 → 32
Alt Table
Click to see full alt table
StatusAccuracyProgram
65.4%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))) (sqrt.f64 #s(literal 2 binary64)))
63.2%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
62.3%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
99.0%
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
98.9%
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
62.3%
(*.f64 (fma.f64 a2 a2 (*.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))))
68.0%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
▶99.7%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
63.2%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 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))))))
99.5%
(*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
▶99.6%
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
98.9%
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
99.0%
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
62.3%
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 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 2 binary64)))))
40.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
▶48.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
68.0%
#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 (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))))
55.9%
#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 (sqrt.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))))
49.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))))
67.6%
#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)))))
▶67.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
✓68.0%
#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))))
53.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
67.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
✓14.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
56.4%
#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 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))))
39.8%
#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 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
50.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
99.0%
#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)))))
67.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
▶14.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
99.6%
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (cos.f64 th)))
Compiler

Compiled 2 001 to 1 245 computations (37.8% saved)

simplify194.0ms (1.5%)

Memory
29.8MiB live, 127.8MiB allocated; 32ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(fma.f64 a2 a2 (*.f64 a1 a1))
cost-diff0
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(cos.f64 th)
cost-diff0
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
cost-diff4
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
cost-diff7
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th)))
cost-diff0
(*.f64 a2 a2)
cost-diff0
(/.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))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
cost-diff3
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
cost-diff0
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
cost-diff0
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
cost-diff0
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th)))
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) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
057488
087459
1188446
2653414
32844408
08164406
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th)))
(*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))
(pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(cos.f64 th)
th
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
(/.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))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(*.f64 a1 a1)
a1
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th)))
(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)
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 (/.f64 #s(approx (+ (* a2 a2) (* 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)))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
#s(literal 1/24 binary64)
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(cos.f64 th)
th
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
(*.f64 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th)))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))
(*.f64 (cos.f64 th) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
(pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(cos.f64 th)
th
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))
(/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1)
(*.f64 a1 a1)
a1
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#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))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th)))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (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)
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
(*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* 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))
#s(literal -1/720 binary64)
#s(literal 1/24 binary64)
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(cos.f64 th)
th
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

localize331.0ms (2.6%)

Memory
8.8MiB live, 199.1MiB allocated; 15ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.0
(cos.f64 th)
accuracy0.08203125
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.24675751953688405
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
accuracy2.2968522811307714
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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)))
accuracy2.7349180129190747
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
accuracy15.198435578621707
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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))
accuracy24.924413649647384
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
accuracy0.20041706240518314
(/.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))
accuracy0.22332001953688402
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
accuracy0.23894501953688402
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
accuracy20.361014219638374
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
accuracy0.15625
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
accuracy0.421875
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy20.361014219638374
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
accuracy53.25346766468326
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
accuracy0.0
(cos.f64 th)
accuracy0.0
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th)))
accuracy0.21941376953688405
(*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))
accuracy0.23046875
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
Samples
295.0ms256×0valid
Compiler

Compiled 378 to 49 computations (87% saved)

Precisions
Click to see histograms. Total time spent on operations: 235.0ms
ival-mult: 157.0ms (66.7% of total)
ival-pow: 30.0ms (12.7% of total)
ival-div: 13.0ms (5.5% of total)
ival-add: 11.0ms (4.7% of total)
const: 9.0ms (3.8% of total)
ival-cos: 8.0ms (3.4% of total)
ival-pow2: 4.0ms (1.7% of total)
ival-sqrt: 3.0ms (1.3% of total)
exact: 1.0ms (0.4% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series163.0ms (1.3%)

Memory
-16.4MiB live, 172.9MiB allocated; 18ms collecting garbage
Counts
24 → 122
Calls
Call 1
Inputs
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64))
(*.f64 a2 a2)
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(cos.f64 th)
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 (/.f64 #s(approx (+ (* a2 a2) (* 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)))
(sqrt.f64 #s(literal 2 binary64))
Outputs
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a2 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (* (pow a1 2) (cos th))) (* (pow 1/4 1/4) (* (pow a2 2) (cos th))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ a1 (sqrt 2)) a1) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (sqrt 2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a1 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a1 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (pow 1/4 1/4)))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (pow th 2))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* 1/24 (* (pow 1/4 1/4) (pow th 2))))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (pow th 2))) (* 1/24 (pow 1/4 1/4)))))) (pow 1/4 1/4))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (pow 1/4 1/4)))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (pow th 2))) (pow 1/4 1/4))))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* 1/24 (* (pow 1/4 1/4) (pow th 2))))) (pow 1/4 1/4))))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (pow th 2))) (* 1/24 (pow 1/4 1/4)))))) (pow 1/4 1/4))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (* (pow 1/4 1/4) (cos th))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (* (pow 1/4 1/4) (cos th))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
Calls

9 calls:

TimeVariablePointExpression
43.0ms
th
@-inf
((* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (/ (cos th) (pow (pow 4 1/8) 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (* (/ a1 (sqrt 2)) a1) (/ a1 (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (* a2 a2) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* (pow 1/4 1/4) (cos th)) (* (sqrt 2) (* a1 a1)) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (sqrt 2))
35.0ms
th
@inf
((* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (/ (cos th) (pow (pow 4 1/8) 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (* (/ a1 (sqrt 2)) a1) (/ a1 (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (* a2 a2) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* (pow 1/4 1/4) (cos th)) (* (sqrt 2) (* a1 a1)) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (sqrt 2))
18.0ms
a2
@0
((* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (/ (cos th) (pow (pow 4 1/8) 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (* (/ a1 (sqrt 2)) a1) (/ a1 (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (* a2 a2) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* (pow 1/4 1/4) (cos th)) (* (sqrt 2) (* a1 a1)) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (sqrt 2))
15.0ms
a1
@0
((* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (/ (cos th) (pow (pow 4 1/8) 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (* (/ a1 (sqrt 2)) a1) (/ a1 (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (* a2 a2) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* (pow 1/4 1/4) (cos th)) (* (sqrt 2) (* a1 a1)) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (sqrt 2))
11.0ms
a1
@inf
((* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (/ (cos th) (pow (pow 4 1/8) 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (* (/ a1 (sqrt 2)) a1) (/ a1 (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (* a2 a2) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* (pow 1/4 1/4) (cos th)) (* (sqrt 2) (* a1 a1)) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (sqrt 2))

simplify370.0ms (2.9%)

Memory
24.6MiB live, 251.8MiB allocated; 34ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04234903
113804479
080044083
Stop Event
1×iter limit
1×node limit
Counts
122 → 122
Calls
Call 1
Inputs
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a2 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (* (pow a1 2) (cos th))) (* (pow 1/4 1/4) (* (pow a2 2) (cos th))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ a1 (sqrt 2)) a1) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (sqrt 2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a1 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a1 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (pow 1/4 1/4)))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (pow th 2))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* 1/24 (* (pow 1/4 1/4) (pow th 2))))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (pow th 2))) (* 1/24 (pow 1/4 1/4)))))) (pow 1/4 1/4))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (pow 1/4 1/4)))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (pow th 2))) (pow 1/4 1/4))))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* 1/24 (* (pow 1/4 1/4) (pow th 2))))) (pow 1/4 1/4))))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (pow th 2))) (* 1/24 (pow 1/4 1/4)))))) (pow 1/4 1/4))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (* (pow 1/4 1/4) (cos th))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (* (pow 1/4 1/4) (cos th))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
Outputs
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a2 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (* (pow a1 2) (cos th))) (* (pow 1/4 1/4) (* (pow a2 2) (cos th))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* a2 a2) (* a1 a1)) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (* a1 a1) (*.f64 a1 a1))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.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))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ a1 (sqrt 2)) a1) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (/ a1 (sqrt 2)) a1) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (/ a1 (sqrt 2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (sqrt 2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (* (sqrt 2) (* a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (pow a1 2) (cos th)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a1 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a2 2) (cos th)) (pow a1 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) a1) a1) (fma.f64 (/.f64 (cos.f64 th) a1) (/.f64 (*.f64 a2 a2) a1) (cos.f64 th))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.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))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a1 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) (fma.f64 (/.f64 a2 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (/.f64 a2 a1) (/.f64 a2 a1)) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th))) (*.f64 a1 a1)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a2 a1)) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (* a2 a2) (*.f64 a2 a2))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow a2 2) (+ (* (pow 1/4 1/4) (cos th)) (* (pow 1/4 1/4) (/ (* (pow a1 2) (cos th)) (pow a2 2)))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) a2) a2) (fma.f64 (/.f64 (cos.f64 th) a2) (/.f64 (*.f64 a1 a1) a2) (cos.f64 th))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (/.f64 a1 a2) (/.f64 a1 a2)) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 a2)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th))) (*.f64 a2 a2)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (/.f64 a1 (*.f64 a2 a2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 th th)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (+ (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (* (pow th 2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (pow 1/4 1/4) (+ (pow a1 2) (pow a2 2)))))))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) th) th))) (*.f64 th th))) (*.f64 th th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (pow 1/4 1/4)))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (pow th 2))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) th) th (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* 1/24 (* (pow 1/4 1/4) (pow th 2))))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) th) th (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (*.f64 th th) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (pow th 2))) (* 1/24 (pow 1/4 1/4)))))) (pow 1/4 1/4))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (pow.f64 th #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) th) th (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (*.f64 th th) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#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))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 th 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))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole 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))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(literal 1 binary64))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (+ (* -1/2 (* th th)) 1) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#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))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (cos th) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal -1/720 binary64)) #s(literal 1/2 binary64))) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (pow 1/4 1/4)))
#s(approx (* (pow 1/4 1/4) (cos th)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (+ (* -1/2 (* (pow 1/4 1/4) (pow th 2))) (pow 1/4 1/4))))
#s(approx (* (pow 1/4 1/4) (cos th)) (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) th) th (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* 1/24 (* (pow 1/4 1/4) (pow th 2))))) (pow 1/4 1/4))))
#s(approx (* (pow 1/4 1/4) (cos th)) (fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) th) th (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)))) (*.f64 th th) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow 1/4 1/4)) (* (pow th 2) (+ (* -1/720 (* (pow 1/4 1/4) (pow th 2))) (* 1/24 (pow 1/4 1/4)))))) (pow 1/4 1/4))))
#s(approx (* (pow 1/4 1/4) (cos th)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (pow.f64 th #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) th) th (*.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))) (*.f64 th th) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 th th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) #s(hole binary64 (* (pow 1/4 1/4) (* (cos th) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) #s(hole binary64 (* (pow 1/4 1/4) (cos th))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 6 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.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))) (pow.f64 th #s(literal 6 binary64)))))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 6 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) th) th))
#s(approx (* (cos th) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (cos th) (cos.f64 th))
#s(approx (* (pow 1/4 1/4) (cos th)) #s(hole binary64 (* (pow 1/4 1/4) (cos th))))
#s(approx (* (pow 1/4 1/4) (cos th)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.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)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 th #s(literal 4 binary64))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (/.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 th th)))

rewrite396.0ms (3.1%)

Memory
-5.6MiB live, 240.8MiB allocated; 161ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
057410
087382
1316358
22396346
08274344
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
24 → 830
Calls
Call 1
Inputs
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64))
(*.f64 a2 a2)
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(cos.f64 th)
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 (/.f64 #s(approx (+ (* a2 a2) (* 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)))
(sqrt.f64 #s(literal 2 binary64))
Outputs
(*.f64 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 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))) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 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 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 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) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #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 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 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))) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 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 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 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) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 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 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(fma.f64 (*.f64 a2 a2) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (*.f64 (*.f64 a1 a1) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64))))))
(fma.f64 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (*.f64 a2 a2) (*.f64 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (*.f64 a1 a1)))
(fma.f64 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (*.f64 a1 a1) (*.f64 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (*.f64 a2 a2)))
(fma.f64 (*.f64 a1 a1) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (*.f64 (*.f64 a2 a2) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64))))))
(+.f64 (*.f64 (*.f64 a2 a2) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64))))) (*.f64 (*.f64 a1 a1) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64))))))
(+.f64 (*.f64 (*.f64 a1 a1) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64))))) (*.f64 (*.f64 a2 a2) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64))))))
(+.f64 (*.f64 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (*.f64 a2 a2)) (*.f64 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (*.f64 a1 a1)))
(+.f64 (*.f64 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (*.f64 a1 a1)) (*.f64 #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))) (*.f64 a2 a2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))))))
(/.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 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 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 (fma.f64 (pow.f64 a2 #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 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 6 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 (-.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 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))))
(/.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 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 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 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 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 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(/.f64 (+.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 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))) (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 a2) (neg.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 (neg.f64 (neg.f64 a1)) a1))
(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 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 a1)))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 (neg.f64 a2)))
(+.f64 (/.f64 (pow.f64 a2 #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 (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 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.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 (neg.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))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(sqrt.f64 (pow.f64 a1 #s(literal 4 binary64)))
(fabs.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 (neg.f64 a1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64))))
#s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)
(*.f64 (neg.f64 a1) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 a1 (fabs.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a1 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (fabs.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a1 a1) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))
(fabs.f64 (neg.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
(fabs.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(exp.f64 (-.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.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)))))
(sqrt.f64 (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))) (neg.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (neg.f64 (neg.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))))
(/.f64 (-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))
(/.f64 (-.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (fma.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 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (fma.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 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))))
(/.f64 (fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)))
(fma.f64 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1))) a1 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2))) a2 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2))) a2 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2)) (neg.f64 a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 a1 (fabs.f64 (*.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 a1 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 a2 (fabs.f64 (*.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 a2 (fabs.f64 (*.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 a2 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 a2 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(-.f64 (/.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (neg.f64 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (neg.f64 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(+.f64 (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))) (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) 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))))
(/.f64 (fma.f64 (neg.f64 a1) a1 (*.f64 (neg.f64 a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 a1) a1 (*.f64 a2 (neg.f64 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 a2) a2 (*.f64 (neg.f64 a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 (neg.f64 a2) (*.f64 (neg.f64 a1) a1)) (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))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (/.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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal 8 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) 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(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 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.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 a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (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 a1 a2) #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 a2 #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 a1 a2) #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #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))) (*.f64 (neg.f64 a2) a2))) #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))) (*.f64 a2 (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (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 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.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 (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))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.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 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 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 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 2 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 2 binary64)) (/.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))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (/.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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal 8 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 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))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) #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 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (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))) (pow.f64 #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) 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 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.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))) (pow.f64 #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -2 binary64)))
(neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (neg.f64 a1) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a1) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(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 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(fma.f64 a1 (fabs.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (fabs.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (fabs.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 a2 (fabs.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 a2 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(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 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (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 a1 a2) #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)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 a2 a2)
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 a2)) #s(literal 2 binary64))
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 a2) a2))
(neg.f64 (*.f64 a2 (neg.f64 a2)))
(sqrt.f64 (pow.f64 a2 #s(literal 4 binary64)))
(fabs.f64 (*.f64 (neg.f64 a2) a2))
(fabs.f64 (*.f64 a2 (neg.f64 a2)))
(fabs.f64 (neg.f64 (*.f64 a2 a2)))
(fabs.f64 (*.f64 a2 a2))
(exp.f64 (*.f64 (log.f64 (neg.f64 a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (-.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (/.f64 (-.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 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)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 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)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 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)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 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)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 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 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 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))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.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 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.f64 (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (*.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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.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)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) (*.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)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 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 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 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 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 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 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 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)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 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)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 th #s(literal 8 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (fma.f64 (pow.f64 th #s(literal 12 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 th th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(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)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)) (pow.f64 th #s(literal 3 binary64)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))) th (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 th th) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 4 binary64)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 th (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64)))) th))
(-.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 th #s(literal 4 binary64))))
(-.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))))
(-.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(+.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th))
(*.f64 (*.f64 (*.f64 th th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th))
(*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)) (pow.f64 th #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))) th)
(*.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 th th))
(*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 4 binary64)))
(*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))))
(*.f64 (*.f64 th th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)))
(*.f64 th (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 3 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 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(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 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 (neg.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 (-.f64 (*.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 (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))) (*.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 4 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 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 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 th)) (neg.f64 th) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) th) (*.f64 th #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) th) th #s(literal 1 binary64))
(fma.f64 (neg.f64 th) (*.f64 (neg.f64 th) #s(literal -1/2 binary64)) #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 #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))
(fma.f64 th (*.f64 #s(literal -1/2 binary64) th) #s(literal 1 binary64))
(-.f64 (/.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (pow.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) th)) th))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 th th)) #s(literal -1/2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))
(+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 th #s(literal 6 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))))) (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)))
(+.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)))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (cos.f64 th))) (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (cos.f64 th))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.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 (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 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 (cos.f64 th) (/.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 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 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)) (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))))
(/.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 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (neg.f64 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (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))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.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 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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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 a1) (*.f64 a2 a2)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 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 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #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 (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))) #s(literal 2 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 (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))) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 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 (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))) #s(literal 2 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 (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))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.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)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.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))))) #s(literal 2 binary64))
(/.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)))) #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 (*.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) (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) (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 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #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 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2)))) #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 (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)))) #s(literal 2 binary64))
(/.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))))) #s(literal 2 binary64))
(/.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)))) #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 (*.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) (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) (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 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (cos.f64 th)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (cos.f64 th) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (-.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 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 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)) (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.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 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (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))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.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 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.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 a1) (*.f64 a2 a2))))
(/.f64 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (/.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 (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))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a2 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 (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)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.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 a1) (*.f64 a2 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 a1) (*.f64 a2 a2)))))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(+.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #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 (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))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (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 (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))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(fma.f64 (sin.f64 th) #s(literal 0 binary64) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 th) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(sin.f64 (+.f64 (neg.f64 (neg.f64 th)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 th))))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(+.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(/.f64 (fma.f64 (neg.f64 a1) a1 (*.f64 (neg.f64 a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 a1) a1 (*.f64 a2 (neg.f64 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 a2) a2 (*.f64 (neg.f64 a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 (neg.f64 a2) (*.f64 (neg.f64 a1) a1)) (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))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (/.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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal 8 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) 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(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 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.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 a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (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 a1 a2) #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (pow.f64 (/.f64 (pow.f64 a2 #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 a1 a2) #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #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))) (*.f64 (neg.f64 a2) a2))) #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))) (*.f64 a2 (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (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 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.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 (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))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.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 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 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 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 2 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 2 binary64)) (/.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))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (/.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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64)) (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64))) #s(literal 8 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 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))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) #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 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (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))) (pow.f64 #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) 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 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.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))) (pow.f64 #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 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -2 binary64)))
(neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (neg.f64 a1) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a1) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(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 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(fma.f64 a1 (fabs.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (fabs.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (fabs.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (fabs.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 a2 (fabs.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 a2 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(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 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (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 a1 a2) #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)) (+.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 (neg.f64 a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/16 binary64))) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/16 binary64)))
(*.f64 (pow.f64 #s(literal 1/16 binary64) #s(literal 1/16 binary64)) (*.f64 (pow.f64 #s(literal 1/16 binary64) #s(literal 1/16 binary64)) (cos.f64 th)))
(*.f64 (cos.f64 th) (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 #s(literal 1/16 binary64) #s(literal 1/8 binary64)) (cos.f64 th))
(*.f64 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1))) a1)
(*.f64 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1)
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 (fabs.f64 (*.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a1 (fabs.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(sqrt.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fabs.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(exp.f64 (fma.f64 (log.f64 #s(literal 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 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 th)) (neg.f64 th))
(*.f64 (*.f64 (*.f64 th th) (/.f64 #s(approx (+ (* a2 a2) (* 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 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)) th)
(*.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))
(*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th))
(*.f64 (*.f64 th th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 th (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 th th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 th th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)))
(+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (/.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)))) (neg.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (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 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) #s(literal 3 binary64)) #s(literal -1/373248000 binary64) (*.f64 (pow.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) #s(literal 1/13824 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (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)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (neg.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 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 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) #s(literal 1/24 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (*.f64 #s(literal -1/720 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(literal 1/24 binary64)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64))) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)))
(/.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (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 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal 1/24 binary64) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) #s(literal 3 binary64)) #s(literal -1/373248000 binary64) (*.f64 (pow.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) #s(literal 1/13824 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (*.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)))) (*.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)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (*.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)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 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 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (-.f64 (*.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64))) #s(literal 1/576 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 th #s(literal 6 binary64)) #s(literal 1/13824 binary64))) (*.f64 (sqrt.f64 #s(literal 2 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 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) th)) th (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/720 binary64)) (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal -1/720 binary64) th) (*.f64 th (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 th th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/24 binary64) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 th th) (*.f64 #s(literal -1/720 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/24 binary64)))
(+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))) (neg.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))))
(*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (fabs.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (fabs.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)) #s(literal 1 binary64)) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)))
(*.f64 (pow.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)) (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))))
(*.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)) (pow.f64 (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)) (pow.f64 #s(literal 64 binary64) #s(literal 1/16 binary64)))
(*.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)) (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/8 binary64)))
(pow.f64 #s(literal 256 binary64) #s(literal 1/16 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64))) #s(literal 2 binary64))
(pow.f64 #s(literal 16 binary64) #s(literal 1/8 binary64))
(pow.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/32 binary64)) #s(literal 4 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 #s(literal 16 binary64) #s(literal 1/16 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(sqrt.f64 #s(literal 2 binary64))
(fabs.f64 (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 16 binary64)) #s(literal 1/8 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 #s(literal 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 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (cosh.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/4 binary64))) (sinh.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal 1/4 binary64))))
(+.f64 (cosh.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64)))) (sinh.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64)))))

eval432.0ms (3.4%)

Memory
11.6MiB live, 298.4MiB allocated; 44ms collecting garbage
Compiler

Compiled 57 286 to 4 309 computations (92.5% saved)

prune138.0ms (1.1%)

Memory
-14.8MiB live, 157.1MiB allocated; 83ms collecting garbage
Pruning

35 alts after pruning (32 fresh and 3 done)

PrunedKeptTotal
New1 111121 123
Fresh52025
Picked415
Done022
Total1 120351 155
Accuracy
100.0%
Counts
1 155 → 35
Alt Table
Click to see full alt table
StatusAccuracyProgram
65.4%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))) (sqrt.f64 #s(literal 2 binary64)))
63.2%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
62.3%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
99.0%
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
98.9%
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
62.3%
(*.f64 (fma.f64 a2 a2 (*.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))))
68.0%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
63.2%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 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))))))
99.5%
(*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
99.0%
(*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
98.9%
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
99.1%
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
62.3%
(*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
99.0%
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
40.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
48.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
13.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
67.6%
#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)))))
✓68.0%
#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))))
67.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
53.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
67.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
✓14.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
56.4%
#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 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))))
39.8%
#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 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
50.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
99.0%
#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)))))
67.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
14.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
41.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) (fma.f64 (/.f64 a2 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (sqrt.f64 #s(literal 2 binary64))))))
68.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))))
67.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
✓14.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
20.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (sqrt.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
99.6%
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (cos.f64 th)))
Compiler

Compiled 3 504 to 1 046 computations (70.1% saved)

regimes247.0ms (1.9%)

Memory
-11.5MiB live, 333.9MiB allocated; 146ms collecting garbage
Counts
64 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.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 (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 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 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 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 2 binary64)))))
(*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.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 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 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 (sqrt.f64 (/.f64 (*.f64 a2 a2) #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 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #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 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) (fma.f64 (/.f64 a2 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 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))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (sqrt.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #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)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 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)))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 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 (sqrt.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 a2) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (cos.f64 th)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
(/.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 (cos.f64 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 (*.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)))) #s(literal 2 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal 1/8 binary64)) #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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.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)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
Outputs
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
Calls

8 calls:

75.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)))
33.0ms
th
32.0ms
(*.f64 a2 a2)
29.0ms
a2
22.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
99.7%1(*.f64 a2 a2)
99.7%1(*.f64 a1 a1)
99.7%1(cos.f64 th)
99.7%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
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%1a1
99.7%1a2
99.7%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes167.0ms (1.3%)

Memory
20.4MiB live, 210.2MiB allocated; 16ms collecting garbage
Counts
57 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.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 (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 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 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 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 2 binary64)))))
(*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.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 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 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 (sqrt.f64 (/.f64 (*.f64 a2 a2) #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 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #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 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) (fma.f64 (/.f64 a2 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 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))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (sqrt.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #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)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 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)))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 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 (sqrt.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 #s(approx (+ (* (/ a2 a1) (/ a2 a1)) 1) (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 a2 a2) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (pow 2 1/4)) (pow 2 1/4)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))))
(*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (cos.f64 th)))
Outputs
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (cos.f64 th)))
Calls

8 calls:

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

Compiled 35 to 40 computations (-14.3% saved)

regimes221.0ms (1.7%)

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

8 calls:

38.0ms
(*.f64 a1 a1)
34.0ms
(cos.f64 th)
28.0ms
a2
28.0ms
a1
26.0ms
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Results
AccuracySegmentsBranch
99.6%1(*.f64 a2 a2)
99.6%1(*.f64 a1 a1)
99.6%1(cos.f64 th)
99.6%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.6%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
99.6%1a1
99.6%1a2
99.6%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes178.0ms (1.4%)

Memory
-17.7MiB live, 214.3MiB allocated; 75ms collecting garbage
Counts
43 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.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 (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 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 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 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 2 binary64)))))
(*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.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 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 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 (sqrt.f64 (/.f64 (*.f64 a2 a2) #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 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #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 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) (fma.f64 (/.f64 a2 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 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))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (sqrt.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #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)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 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)))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
Outputs
(*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
Calls

8 calls:

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

Compiled 35 to 40 computations (-14.3% saved)

regimes118.0ms (0.9%)

Memory
0.7MiB live, 193.5MiB allocated; 15ms collecting garbage
Counts
40 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.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 (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 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 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 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 2 binary64)))))
(*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.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 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 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 (sqrt.f64 (/.f64 (*.f64 a2 a2) #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 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #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 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) (fma.f64 (/.f64 a2 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 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))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (sqrt.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #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)) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
Calls

8 calls:

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

Compiled 35 to 40 computations (-14.3% saved)

regimes139.0ms (1.1%)

Memory
11.6MiB live, 148.6MiB allocated; 26ms collecting garbage
Counts
38 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.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 (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 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 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 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 2 binary64)))))
(*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.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 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 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 (sqrt.f64 (/.f64 (*.f64 a2 a2) #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 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) (fma.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #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 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) (fma.f64 (/.f64 a2 a1) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (sqrt 2)) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 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))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* 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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #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 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 th th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (sqrt.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))))
Outputs
#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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))))
Calls

8 calls:

29.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
24.0ms
a1
22.0ms
(*.f64 a1 a1)
18.0ms
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
14.0ms
(cos.f64 th)
Results
AccuracySegmentsBranch
68.0%1(*.f64 a2 a2)
68.0%1(*.f64 a1 a1)
75.6%2(cos.f64 th)
75.6%2(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
76.5%2(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
68.0%1a1
68.0%1a2
68.0%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes9.0ms (0.1%)

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

1 calls:

8.0ms
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Results
AccuracySegmentsBranch
76.4%2(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Compiler

Compiled 19 to 12 computations (36.8% saved)

regimes42.0ms (0.3%)

Memory
-38.6MiB live, 62.2MiB allocated; 14ms collecting garbage
Counts
9 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.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 (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 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 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))))
Calls

8 calls:

10.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
7.0ms
th
5.0ms
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
5.0ms
(cos.f64 th)
4.0ms
a2
Results
AccuracySegmentsBranch
68.0%1th
68.0%1(*.f64 a1 a1)
68.0%1(*.f64 a2 a2)
68.0%1a1
68.0%1a2
68.0%1(cos.f64 th)
68.0%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
68.0%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes26.0ms (0.2%)

Memory
43.4MiB live, 43.4MiB allocated; 0ms collecting garbage
Counts
6 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.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 (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
Calls

8 calls:

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

Compiled 35 to 40 computations (-14.3% saved)

regimes27.0ms (0.2%)

Memory
-9.9MiB live, 36.5MiB allocated; 4ms collecting garbage
Counts
3 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
Calls

8 calls:

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

Compiled 35 to 40 computations (-14.3% saved)

regimes19.0ms (0.1%)

Memory
-17.7MiB live, 29.2MiB allocated; 5ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

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

8 calls:

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

Compiled 35 to 40 computations (-14.3% saved)

bsearch1.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated; 0ms collecting garbage
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
-1.4209480828612905e-189
-2.56980297565697e-212
Compiler

Compiled 22 to 18 computations (18.2% saved)

bsearch1.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
-1.4209480828612905e-189
-2.56980297565697e-212
Compiler

Compiled 22 to 18 computations (18.2% saved)

simplify70.0ms (0.5%)

Memory
-0.1MiB live, 46.3MiB allocated; 5ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
087428
1147413
2371413
31128413
42863413
56199413
Stop Event
1×node limit
Calls
Call 1
Inputs
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (cos.f64 th)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a2 a2) (* 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 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 (+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) #s(literal -5016456510113119/5016456510113118655434598811035278955030765345404790744303017523831112055108147451509157692220295382716162651878526895249385292291816524375083746691371804094271873160484737966720260389217684476157468082176 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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))))))
(if (<=.f64 (+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) #s(literal -5016456510113119/5016456510113118655434598811035278955030765345404790744303017523831112055108147451509157692220295382716162651878526895249385292291816524375083746691371804094271873160484737966720260389217684476157468082176 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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 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))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))
Outputs
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(approx (/ (cos th) (pow (pow 4 1/8) 2)) (*.f64 (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64)) (cos.f64 th))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (/ (cos th) (pow (pow 4 1/8) 2))) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))) (cos.f64 th)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 #s(approx (+ (* a2 a2) (* 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 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 (+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) #s(literal -5016456510113119/5016456510113118655434598811035278955030765345404790744303017523831112055108147451509157692220295382716162651878526895249385292291816524375083746691371804094271873160484737966720260389217684476157468082176 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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 a2 (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))))))
(if (<=.f64 (+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) #s(literal -5016456510113119/5016456510113118655434598811035278955030765345404790744303017523831112055108147451509157692220295382716162651878526895249385292291816524375083746691371804094271873160484737966720260389217684476157468082176 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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 #s(literal 1/2 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))) #s(approx (+ (* (/ a1 (sqrt 2)) a1) (* a2 (/ a2 (sqrt 2)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1)))

derivations1.4s (11%)

Memory
1.1MiB live, 1 095.0MiB allocated; 194ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 482 to 88 computations (81.7% saved)

preprocess317.0ms (2.5%)

Memory
14.7MiB live, 138.0MiB allocated; 83ms collecting garbage
Remove

(sort a1 a2)

(abs a1)

(abs a2)

(abs th)

Compiler

Compiled 1 178 to 344 computations (70.8% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

Profiling

Loading profile data...